/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Music / J-L / Loop Sequencer 1.0.sit / Source / main.c++

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 6d 61 69 6e 2e 63 | 2b 2b 00 00 00 00 00 00 |..main.c|++......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 4d 43 | 43 01 00 00 00 00 00 00 |.TEXTMMC|C.......|
|00000050| 00 00 00 00 00 4e 0a 00 | 00 01 7e aa a3 b6 c3 aa |.....N..|..~.....|
|00000060| a3 b6 c3 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 89 80 00 00 |........|........|
|00000080| 2f 2a 0d 09 6d 61 69 6e | 2e 63 2b 2b 0d 0d 09 2a |/*..main|.c++...*|
|00000090| 20 50 61 72 74 20 6f 66 | 20 4c 6f 6f 70 20 53 65 | Part of| Loop Se|
|000000a0| 71 75 65 6e 63 65 72 20 | 75 74 69 6c 69 74 79 0d |quencer |utility.|
|000000b0| 09 2a 20 57 72 69 74 74 | 65 6e 20 62 79 20 48 69 |.* Writt|en by Hi|
|000000c0| 65 70 20 44 61 6d 2c 09 | 33 47 20 53 6f 66 74 77 |ep Dam,.|3G Softw|
|000000d0| 61 72 65 0d 09 2a 20 52 | 65 6c 65 61 73 65 64 09 |are..* R|eleased.|
|000000e0| 09 09 09 53 65 70 74 20 | 31 39 39 34 0d 09 2a 20 |...Sept |1994..* |
|000000f0| 4c 61 73 74 20 55 70 64 | 61 74 65 09 09 09 53 65 |Last Upd|ate...Se|
|00000100| 70 74 20 31 39 39 34 0d | 09 2a 20 56 65 72 73 69 |pt 1994.|.* Versi|
|00000110| 6f 6e 20 31 2e 30 0d 09 | 2a 20 43 6f 6e 74 61 63 |on 1.0..|* Contac|
|00000120| 74 3a 20 41 4f 4c 20 2d | 3e 09 09 53 74 61 72 4c |t: AOL -|>..StarL|
|00000130| 61 62 73 0d 09 20 20 20 | 20 20 20 20 20 20 20 20 |abs..   |        |
|00000140| 49 6e 74 65 72 6e 65 74 | 20 2d 3e 09 73 74 61 72 |Internet| ->.star|
|00000150| 6c 61 62 73 40 61 6f 6c | 2e 63 6f 6d 0d 09 2a 20 |labs@aol|.com..* |
|00000160| 54 68 69 73 20 73 6f 75 | 72 63 65 20 63 6f 64 65 |This sou|rce code|
|00000170| 20 28 61 6e 64 20 63 6f | 6d 70 69 6c 65 64 20 62 | (and co|mpiled b|
|00000180| 69 6e 61 72 79 20 61 70 | 70 6c 69 63 61 74 69 6f |inary ap|plicatio|
|00000190| 6e 29 20 61 72 65 20 63 | 6f 70 79 72 69 67 68 74 |n) are c|opyright|
|000001a0| 0d 09 20 20 a9 31 39 39 | 34 20 62 79 20 48 69 65 |..  .199|4 by Hie|
|000001b0| 70 20 44 61 6d 2e 20 48 | 6f 77 65 76 65 72 2c 20 |p Dam. H|owever, |
|000001c0| 79 6f 75 20 61 72 65 20 | 66 72 65 65 20 74 6f 20 |you are |free to |
|000001d0| 69 6e 63 6f 72 70 6f 72 | 61 74 65 20 70 61 72 74 |incorpor|ate part|
|000001e0| 73 20 61 6e 64 0d 09 20 | 20 70 69 65 63 65 73 20 |s and.. | pieces |
|000001f0| 6f 66 20 63 6f 64 65 20 | 69 6e 20 79 6f 75 72 20 |of code |in your |
|00000200| 6f 77 6e 20 70 72 6f 6a | 65 63 74 73 2c 20 73 69 |own proj|ects, si|
|00000210| 6e 63 65 20 49 20 61 6d | 20 72 65 6c 65 61 73 69 |nce I am| releasi|
|00000220| 6e 67 20 74 68 69 73 0d | 09 20 20 73 6f 75 72 63 |ng this.|.  sourc|
|00000230| 65 20 63 6f 64 65 20 66 | 6f 72 20 65 64 75 63 61 |e code f|or educa|
|00000240| 74 69 6f 6e 61 6c 20 70 | 75 72 70 6f 73 65 73 2e |tional p|urposes.|
|00000250| 0d 0d 09 2a 20 54 68 69 | 73 20 66 69 6c 65 3a 0d |...* Thi|s file:.|
|00000260| 09 09 43 6f 6e 74 61 69 | 6e 73 20 6d 61 69 6e 6c |..Contai|ns mainl|
|00000270| 79 20 74 68 65 20 69 6e | 74 65 72 66 61 63 65 20 |y the in|terface |
|00000280| 73 74 75 66 66 20 6f 66 | 20 4c 6f 6f 70 20 53 65 |stuff of| Loop Se|
|00000290| 71 75 65 6e 63 65 72 2e | 20 48 61 6e 64 6c 65 73 |quencer.| Handles|
|000002a0| 0d 09 09 64 69 61 6c 6f | 67 73 2c 20 75 70 64 61 |...dialo|gs, upda|
|000002b0| 74 69 6e 67 2c 20 65 76 | 65 6e 74 73 2c 20 65 74 |ting, ev|ents, et|
|000002c0| 63 2e 2e 2e 0d 0d 2a 2f | 0d 0d 23 69 6e 63 6c 75 |c.....*/|..#inclu|
|000002d0| 64 65 20 3c 41 70 70 6c | 65 45 76 65 6e 74 73 2e |de <Appl|eEvents.|
|000002e0| 68 3e 0d 23 69 6e 63 6c | 75 64 65 20 22 44 69 61 |h>.#incl|ude "Dia|
|000002f0| 6c 6f 67 55 74 69 6c 73 | 2e 68 22 0d 23 69 6e 63 |logUtils|.h".#inc|
|00000300| 6c 75 64 65 20 22 43 6f | 6d 70 61 74 2e 68 22 0d |lude "Co|mpat.h".|
|00000310| 23 69 6e 63 6c 75 64 65 | 20 22 42 69 74 73 41 6e |#include| "BitsAn|
|00000320| 64 42 79 74 65 73 2e 68 | 22 0d 23 69 6e 63 6c 75 |dBytes.h|".#inclu|
|00000330| 64 65 20 22 48 61 6e 64 | 6c 65 41 70 70 6c 65 45 |de "Hand|leAppleE|
|00000340| 76 65 6e 74 73 2e 68 22 | 0d 23 69 6e 63 6c 75 64 |vents.h"|.#includ|
|00000350| 65 20 22 4c 6f 6f 70 53 | 65 71 75 65 6e 63 65 72 |e "LoopS|equencer|
|00000360| 2e 68 22 0d 23 69 6e 63 | 6c 75 64 65 20 22 4b 65 |.h".#inc|lude "Ke|
|00000370| 79 55 74 69 6c 73 2e 68 | 22 0d 23 69 6e 63 6c 75 |yUtils.h|".#inclu|
|00000380| 64 65 20 22 53 74 72 69 | 6e 67 55 74 69 6c 73 2e |de "Stri|ngUtils.|
|00000390| 68 22 0d 23 69 6e 63 6c | 75 64 65 20 22 53 6f 75 |h".#incl|ude "Sou|
|000003a0| 6e 64 55 74 69 6c 73 2e | 68 22 0d 0d 2f 2f 20 2d |ndUtils.|h"..// -|
|000003b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 0d 2f 2f 20 41 |--------|--..// A|
|00000400| 20 6d 65 73 73 20 27 6f | 20 70 72 6f 74 6f 74 79 | mess 'o| prototy|
|00000410| 70 65 73 2e 2e 2e 0d 76 | 6f 69 64 20 49 6e 69 74 |pes....v|oid Init|
|00000420| 54 6f 6f 6c 62 6f 78 28 | 29 3b 0d 76 6f 69 64 20 |Toolbox(|);.void |
|00000430| 49 6e 69 74 41 70 70 28 | 29 3b 0d 76 6f 69 64 20 |InitApp(|);.void |
|00000440| 49 6e 69 74 4c 69 73 74 | 73 28 29 3b 0d 42 6f 6f |InitList|s();.Boo|
|00000450| 6c 65 61 6e 20 50 72 6f | 63 65 73 73 4b 65 79 44 |lean Pro|cessKeyD|
|00000460| 6f 77 6e 46 69 72 73 74 | 28 45 76 65 6e 74 52 65 |ownFirst|(EventRe|
|00000470| 63 6f 72 64 20 2a 74 68 | 65 45 76 65 6e 74 29 3b |cord *th|eEvent);|
|00000480| 0d 76 6f 69 64 20 48 61 | 6e 64 6c 65 45 76 65 6e |.void Ha|ndleEven|
|00000490| 74 28 45 76 65 6e 74 52 | 65 63 6f 72 64 20 2a 74 |t(EventR|ecord *t|
|000004a0| 68 65 45 76 65 6e 74 29 | 3b 0d 76 6f 69 64 20 48 |heEvent)|;.void H|
|000004b0| 61 6e 64 6c 65 4d 65 6e | 75 28 6c 6f 6e 67 20 6d |andleMen|u(long m|
|000004c0| 65 6e 75 43 6f 64 65 29 | 3b 0d 76 6f 69 64 20 48 |enuCode)|;.void H|
|000004d0| 61 6e 64 6c 65 41 63 74 | 69 76 61 74 65 28 57 69 |andleAct|ivate(Wi|
|000004e0| 6e 64 6f 77 50 74 72 20 | 74 68 65 57 69 6e 64 6f |ndowPtr |theWindo|
|000004f0| 77 2c 20 42 6f 6f 6c 65 | 61 6e 20 61 63 74 69 76 |w, Boole|an activ|
|00000500| 61 74 65 2c 20 45 76 65 | 6e 74 52 65 63 6f 72 64 |ate, Eve|ntRecord|
|00000510| 20 2a 74 68 65 45 76 65 | 6e 74 29 3b 0d 76 6f 69 | *theEve|nt);.voi|
|00000520| 64 20 48 61 6e 64 6c 65 | 4f 53 45 76 65 6e 74 28 |d Handle|OSEvent(|
|00000530| 45 76 65 6e 74 52 65 63 | 6f 72 64 20 2a 74 68 65 |EventRec|ord *the|
|00000540| 45 76 65 6e 74 29 3b 0d | 0d 76 6f 69 64 20 55 70 |Event);.|.void Up|
|00000550| 64 61 74 65 4d 65 73 73 | 61 67 65 28 29 3b 0d 76 |dateMess|age();.v|
|00000560| 6f 69 64 20 43 68 61 6e | 67 65 53 6f 75 6e 64 56 |oid Chan|geSoundV|
|00000570| 6f 6c 75 6d 65 28 29 3b | 0d 76 6f 69 64 20 53 79 |olume();|.void Sy|
|00000580| 73 74 65 6d 37 52 65 71 | 75 69 72 65 64 28 29 3b |stem7Req|uired();|
|00000590| 0d 0d 76 6f 69 64 20 44 | 6f 41 62 6f 75 74 53 65 |..void D|oAboutSe|
|000005a0| 71 75 65 6e 63 65 72 28 | 29 3b 0d 0d 2f 2f 20 2d |quencer(|);..// -|
|000005b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 0d 44 69 61 6c |--------|--..Dial|
|00000600| 6f 67 50 74 72 20 67 53 | 65 71 75 65 6e 63 65 72 |ogPtr gS|equencer|
|00000610| 44 6c 6f 67 3b 0d 42 6f | 6f 6c 65 61 6e 20 67 44 |Dlog;.Bo|olean gD|
|00000620| 6f 6e 65 20 3d 20 66 61 | 6c 73 65 3b 0d 42 6f 6f |one = fa|lse;.Boo|
|00000630| 6c 65 61 6e 20 67 49 6e | 42 61 63 6b 67 72 6f 75 |lean gIn|Backgrou|
|00000640| 6e 64 20 3d 20 66 61 6c | 73 65 3b 0d 42 6f 6f 6c |nd = fal|se;.Bool|
|00000650| 65 61 6e 20 67 46 69 6c | 65 4f 70 65 6e 20 3d 20 |ean gFil|eOpen = |
|00000660| 66 61 6c 73 65 3b 0d 0d | 4c 69 73 74 48 61 6e 64 |false;..|ListHand|
|00000670| 6c 65 20 67 53 6f 75 6e | 64 73 4c 69 73 74 3b 0d |le gSoun|dsList;.|
|00000680| 4c 69 73 74 48 61 6e 64 | 6c 65 20 67 53 65 71 75 |ListHand|le gSequ|
|00000690| 65 6e 63 65 72 4c 69 73 | 74 3b 0d 0d 4d 65 6e 75 |encerLis|t;..Menu|
|000006a0| 48 61 6e 64 6c 65 20 67 | 41 70 70 6c 65 4d 65 6e |Handle g|AppleMen|
|000006b0| 75 3b 0d 4d 65 6e 75 48 | 61 6e 64 6c 65 20 67 46 |u;.MenuH|andle gF|
|000006c0| 69 6c 65 4d 65 6e 75 3b | 0d 4d 65 6e 75 48 61 6e |ileMenu;|.MenuHan|
|000006d0| 64 6c 65 20 67 56 6f 6c | 75 6d 65 4d 65 6e 75 3b |dle gVol|umeMenu;|
|000006e0| 0d 0d 73 74 61 74 69 63 | 20 73 68 6f 72 74 20 67 |..static| short g|
|000006f0| 53 61 76 65 53 6e 64 56 | 6f 6c 3b 0d 73 74 61 74 |SaveSndV|ol;.stat|
|00000700| 69 63 20 53 74 72 32 35 | 35 20 67 4d 65 73 73 61 |ic Str25|5 gMessa|
|00000710| 67 65 20 3d 20 22 5c 70 | 4c 6f 6f 70 20 53 65 71 |ge = "\p|Loop Seq|
|00000720| 75 65 6e 63 65 72 5c 72 | 5c 72 62 79 20 48 69 65 |uencer\r|\rby Hie|
|00000730| 70 20 44 61 6d 5c 72 73 | 74 61 72 6c 61 62 73 40 |p Dam\rs|tarlabs@|
|00000740| 61 6f 6c 2e 63 6f 6d 22 | 3b 0d 0d 2f 2f 20 2d 2d |aol.com"|;..// --|
|00000750| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000760| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000770| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 0d 76 6f 69 64 20 |--------|-..void |
|000007a0| 6d 61 69 6e 28 29 20 7b | 0d 09 70 61 73 63 61 6c |main() {|..pascal|
|000007b0| 20 76 6f 69 64 20 28 2a | 53 68 6f 77 5f 68 65 6c | void (*|Show_hel|
|000007c0| 70 29 28 20 73 68 6f 72 | 74 20 69 6e 66 6f 5f 69 |p)( shor|t info_i|
|000007d0| 64 2c 0d 09 09 70 61 73 | 63 61 6c 20 76 6f 69 64 |d,...pas|cal void|
|000007e0| 20 28 2a 55 70 64 61 74 | 65 50 72 6f 63 29 28 57 | (*Updat|eProc)(W|
|000007f0| 69 6e 64 6f 77 50 74 72 | 29 20 29 3b 0d 0d 09 45 |indowPtr|) );...E|
|00000800| 76 65 6e 74 52 65 63 6f | 72 64 20 74 68 65 45 76 |ventReco|rd theEv|
|00000810| 65 6e 74 3b 0d 09 44 69 | 61 6c 6f 67 50 74 72 20 |ent;..Di|alogPtr |
|00000820| 64 65 73 74 44 6c 6f 67 | 3b 0d 09 73 68 6f 72 74 |destDlog|;..short|
|00000830| 20 69 74 65 6d 48 69 74 | 3b 0d 09 53 74 72 31 35 | itemHit|;..Str15|
|00000840| 20 74 65 6d 70 53 74 72 | 3b 0d 0d 09 49 6e 69 74 | tempStr|;...Init|
|00000850| 54 6f 6f 6c 62 6f 78 28 | 29 3b 0d 09 43 68 65 63 |Toolbox(|);..Chec|
|00000860| 6b 45 6e 76 69 72 6f 6e | 28 29 3b 0d 09 53 79 73 |kEnviron|();..Sys|
|00000870| 74 65 6d 37 52 65 71 75 | 69 72 65 64 28 29 3b 0d |tem7Requ|ired();.|
|00000880| 09 49 6e 69 74 41 70 70 | 28 29 3b 0d 0d 09 67 53 |.InitApp|();...gS|
|00000890| 65 71 75 65 6e 63 65 72 | 44 6c 6f 67 20 3d 20 47 |equencer|Dlog = G|
|000008a0| 65 74 4e 65 77 44 69 61 | 6c 6f 67 28 6b 53 65 71 |etNewDia|log(kSeq|
|000008b0| 75 65 6e 63 65 72 44 6c | 6f 67 49 44 2c 20 6e 69 |uencerDl|ogID, ni|
|000008c0| 6c 2c 20 28 57 69 6e 64 | 6f 77 50 74 72 29 2d 31 |l, (Wind|owPtr)-1|
|000008d0| 29 3b 0d 09 53 65 74 50 | 6f 72 74 28 67 53 65 71 |);..SetP|ort(gSeq|
|000008e0| 75 65 6e 63 65 72 44 6c | 6f 67 29 3b 0d 09 54 65 |uencerDl|og);..Te|
|000008f0| 78 74 46 6f 6e 74 28 67 | 65 6e 65 76 61 29 3b 0d |xtFont(g|eneva);.|
|00000900| 09 54 65 78 74 53 69 7a | 65 28 39 29 3b 0d 09 49 |.TextSiz|e(9);..I|
|00000910| 6e 69 74 4c 69 73 74 73 | 28 29 3b 0d 0d 09 4e 75 |nitLists|();...Nu|
|00000920| 6d 54 6f 53 74 72 69 6e | 67 28 67 53 61 76 65 53 |mToStrin|g(gSaveS|
|00000930| 6e 64 56 6f 6c 2c 20 74 | 65 6d 70 53 74 72 29 3b |ndVol, t|empStr);|
|00000940| 0d 09 53 65 74 44 49 74 | 65 6d 54 65 78 74 28 67 |..SetDIt|emText(g|
|00000950| 53 65 71 75 65 6e 63 65 | 72 44 6c 6f 67 2c 20 6b |Sequence|rDlog, k|
|00000960| 53 65 71 44 6c 6f 67 5f | 56 6f 6c 54 65 78 74 49 |SeqDlog_|VolTextI|
|00000970| 74 65 6d 2c 20 74 65 6d | 70 53 74 72 29 3b 0d 0d |tem, tem|pStr);..|
|00000980| 09 53 68 6f 77 57 69 6e | 64 6f 77 28 67 53 65 71 |.ShowWin|dow(gSeq|
|00000990| 75 65 6e 63 65 72 44 6c | 6f 67 29 3b 0d 0d 09 77 |uencerDl|og);...w|
|000009a0| 68 69 6c 65 20 28 21 67 | 44 6f 6e 65 29 20 7b 0d |hile (!g|Done) {.|
|000009b0| 09 09 69 66 20 28 57 61 | 69 74 4e 65 78 74 45 76 |..if (Wa|itNextEv|
|000009c0| 65 6e 74 28 65 76 65 72 | 79 45 76 65 6e 74 2c 20 |ent(ever|yEvent, |
|000009d0| 26 74 68 65 45 76 65 6e | 74 2c 20 35 30 2c 20 6e |&theEven|t, 50, n|
|000009e0| 69 6c 29 29 20 7b 0d 09 | 09 09 69 66 20 28 50 72 |il)) {..|..if (Pr|
|000009f0| 6f 63 65 73 73 4b 65 79 | 44 6f 77 6e 46 69 72 73 |ocessKey|DownFirs|
|00000a00| 74 28 26 74 68 65 45 76 | 65 6e 74 29 29 20 7b 0d |t(&theEv|ent)) {.|
|00000a10| 09 09 09 09 2f 2f 20 44 | 6f 20 6e 6f 74 68 69 6e |....// D|o nothin|
|00000a20| 67 3b 20 69 74 27 73 20 | 68 61 6e 64 6c 65 64 20 |g; it's |handled |
|00000a30| 61 6c 72 65 61 64 79 2e | 2e 2e 0d 09 09 09 7d 0d |already.|......}.|
|00000a40| 09 09 09 65 6c 73 65 20 | 7b 0d 09 09 09 09 48 61 |...else |{.....Ha|
|00000a50| 6e 64 6c 65 45 76 65 6e | 74 28 26 74 68 65 45 76 |ndleEven|t(&theEv|
|00000a60| 65 6e 74 29 3b 0d 09 09 | 09 09 53 65 74 50 6f 72 |ent);...|..SetPor|
|00000a70| 74 28 67 53 65 71 75 65 | 6e 63 65 72 44 6c 6f 67 |t(gSeque|ncerDlog|
|00000a80| 29 3b 0d 09 09 09 09 69 | 66 20 28 49 73 44 69 61 |);.....i|f (IsDia|
|00000a90| 6c 6f 67 45 76 65 6e 74 | 28 26 74 68 65 45 76 65 |logEvent|(&theEve|
|00000aa0| 6e 74 29 20 26 26 20 44 | 69 61 6c 6f 67 53 65 6c |nt) && D|ialogSel|
|00000ab0| 65 63 74 28 26 74 68 65 | 45 76 65 6e 74 2c 20 26 |ect(&the|Event, &|
|00000ac0| 64 65 73 74 44 6c 6f 67 | 2c 20 26 69 74 65 6d 48 |destDlog|, &itemH|
|00000ad0| 69 74 29 29 20 7b 0d 09 | 09 09 09 09 69 66 20 28 |it)) {..|....if (|
|00000ae0| 64 65 73 74 44 6c 6f 67 | 20 3d 3d 20 67 53 65 71 |destDlog| == gSeq|
|00000af0| 75 65 6e 63 65 72 44 6c | 6f 67 29 20 7b 0d 09 09 |uencerDl|og) {...|
|00000b00| 09 09 09 09 73 77 69 74 | 63 68 28 69 74 65 6d 48 |....swit|ch(itemH|
|00000b10| 69 74 29 20 7b 0d 09 09 | 09 09 09 09 09 63 61 73 |it) {...|.....cas|
|00000b20| 65 20 6b 53 65 71 44 6c | 6f 67 5f 4f 70 65 6e 49 |e kSeqDl|og_OpenI|
|00000b30| 74 65 6d 3a 0d 09 09 09 | 09 09 09 09 09 47 65 74 |tem:....|.....Get|
|00000b40| 4f 70 65 6e 46 69 6c 65 | 28 29 3b 0d 09 09 09 09 |OpenFile|();.....|
|00000b50| 09 09 09 62 72 65 61 6b | 3b 0d 0d 09 09 09 09 09 |...break|;.......|
|00000b60| 09 09 63 61 73 65 20 6b | 53 65 71 44 6c 6f 67 5f |..case k|SeqDlog_|
|00000b70| 43 6c 6f 73 65 49 74 65 | 6d 3a 0d 09 09 09 09 09 |CloseIte|m:......|
|00000b80| 09 09 09 43 6c 6f 73 65 | 46 69 6c 65 28 29 3b 0d |...Close|File();.|
|00000b90| 09 09 09 09 09 09 09 62 | 72 65 61 6b 3b 0d 0d 09 |.......b|reak;...|
|00000ba0| 09 09 09 09 09 09 63 61 | 73 65 20 6b 53 65 71 44 |......ca|se kSeqD|
|00000bb0| 6c 6f 67 5f 51 75 69 74 | 49 74 65 6d 3a 0d 09 09 |log_Quit|Item:...|
|00000bc0| 09 09 09 09 09 09 51 75 | 69 74 41 6e 64 43 6c 65 |......Qu|itAndCle|
|00000bd0| 61 6e 75 70 28 29 3b 0d | 09 09 09 09 09 09 09 62 |anup();.|.......b|
|00000be0| 72 65 61 6b 3b 0d 0d 09 | 09 09 09 09 09 09 63 61 |reak;...|......ca|
|00000bf0| 73 65 20 6b 53 65 71 44 | 6c 6f 67 5f 49 6e 66 6f |se kSeqD|log_Info|
|00000c00| 49 74 65 6d 3a 0d 09 09 | 09 09 09 09 09 09 2f 2a |Item:...|....../*|
|00000c10| 0d 09 09 09 09 09 09 09 | 09 09 53 68 6f 77 5f 48 |........|..Show_H|
|00000c20| 65 6c 70 20 63 6f 64 65 | 20 72 65 73 6f 75 72 63 |elp code| resourc|
|00000c30| 65 2c 20 63 6f 75 72 74 | 65 73 79 20 6f 66 0d 09 |e, court|esy of..|
|00000c40| 09 09 09 09 09 09 09 09 | 4a 61 6d 65 73 20 57 2e |........|James W.|
|00000c50| 20 57 61 6c 6b 65 72 2e | 0d 09 09 09 09 09 09 09 | Walker.|........|
|00000c60| 09 2a 2f 0d 09 09 09 09 | 09 09 09 09 48 61 6e 64 |.*/.....|....Hand|
|00000c70| 6c 65 20 68 65 6c 70 5f | 43 55 53 54 3b 0d 09 09 |le help_|CUST;...|
|00000c80| 09 09 09 09 09 09 68 65 | 6c 70 5f 43 55 53 54 20 |......he|lp_CUST |
|00000c90| 3d 20 47 65 74 31 4e 61 | 6d 65 64 52 65 73 6f 75 |= Get1Na|medResou|
|00000ca0| 72 63 65 28 20 27 43 55 | 53 54 27 2c 20 22 5c 70 |rce( 'CU|ST', "\p|
|00000cb0| 53 68 6f 77 5f 68 65 6c | 70 22 20 29 3b 0d 09 09 |Show_hel|p" );...|
|00000cc0| 09 09 09 09 09 09 48 4c | 6f 63 6b 28 20 68 65 6c |......HL|ock( hel|
|00000cd0| 70 5f 43 55 53 54 20 29 | 3b 0d 09 09 09 09 09 09 |p_CUST )|;.......|
|00000ce0| 09 09 53 68 6f 77 5f 68 | 65 6c 70 20 3d 20 28 70 |..Show_h|elp = (p|
|00000cf0| 61 73 63 61 6c 20 76 6f | 69 64 20 28 2a 29 28 20 |ascal vo|id (*)( |
|00000d00| 73 68 6f 72 74 2c 20 70 | 61 73 63 61 6c 20 76 6f |short, p|ascal vo|
|00000d10| 69 64 20 28 2a 29 28 57 | 69 6e 64 6f 77 50 74 72 |id (*)(W|indowPtr|
|00000d20| 29 20 29 29 0d 09 09 09 | 09 09 09 09 09 09 53 74 |) ))....|......St|
|00000d30| 72 69 70 41 64 64 72 65 | 73 73 28 20 2a 68 65 6c |ripAddre|ss( *hel|
|00000d40| 70 5f 43 55 53 54 20 29 | 3b 0d 09 09 09 09 09 09 |p_CUST )|;.......|
|00000d50| 09 09 28 2a 53 68 6f 77 | 5f 68 65 6c 70 29 28 20 |..(*Show|_help)( |
|00000d60| 32 30 30 31 2c 20 6e 69 | 6c 20 29 3b 0d 09 09 09 |2001, ni|l );....|
|00000d70| 09 09 09 09 09 48 55 6e | 6c 6f 63 6b 28 20 68 65 |.....HUn|lock( he|
|00000d80| 6c 70 5f 43 55 53 54 20 | 29 3b 0d 09 09 09 09 09 |lp_CUST |);......|
|00000d90| 09 09 09 52 65 6c 65 61 | 73 65 52 65 73 6f 75 72 |...Relea|seResour|
|00000da0| 63 65 28 20 68 65 6c 70 | 5f 43 55 53 54 20 29 3b |ce( help|_CUST );|
|00000db0| 0d 09 09 09 09 09 09 09 | 62 72 65 61 6b 3b 0d 0d |........|break;..|
|00000dc0| 09 09 09 09 09 09 09 63 | 61 73 65 20 6b 53 65 71 |.......c|ase kSeq|
|00000dd0| 44 6c 6f 67 5f 53 72 63 | 4c 69 73 74 49 74 65 6d |Dlog_Src|ListItem|
|00000de0| 3a 0d 09 09 09 09 09 09 | 09 09 48 61 6e 64 6c 65 |:.......|..Handle|
|00000df0| 53 6f 75 6e 64 73 4c 69 | 73 74 28 26 74 68 65 45 |SoundsLi|st(&theE|
|00000e00| 76 65 6e 74 29 3b 0d 09 | 09 09 09 09 09 09 62 72 |vent);..|......br|
|00000e10| 65 61 6b 3b 0d 0d 09 09 | 09 09 09 09 09 63 61 73 |eak;....|.....cas|
|00000e20| 65 20 6b 53 65 71 44 6c | 6f 67 5f 53 65 71 4c 69 |e kSeqDl|og_SeqLi|
|00000e30| 73 74 49 74 65 6d 3a 0d | 09 09 09 09 09 09 09 09 |stItem:.|........|
|00000e40| 48 61 6e 64 6c 65 53 65 | 71 75 65 6e 63 65 72 4c |HandleSe|quencerL|
|00000e50| 69 73 74 28 26 74 68 65 | 45 76 65 6e 74 29 3b 0d |ist(&the|Event);.|
|00000e60| 09 09 09 09 09 09 09 62 | 72 65 61 6b 3b 0d 0d 09 |.......b|reak;...|
|00000e70| 09 09 09 09 09 09 63 61 | 73 65 20 6b 53 65 71 44 |......ca|se kSeqD|
|00000e80| 6c 6f 67 5f 49 6e 73 65 | 72 74 49 74 65 6d 3a 0d |log_Inse|rtItem:.|
|00000e90| 09 09 09 09 09 09 09 09 | 49 6e 73 65 72 74 53 6f |........|InsertSo|
|00000ea0| 75 6e 64 28 29 3b 0d 09 | 09 09 09 09 09 09 62 72 |und();..|......br|
|00000eb0| 65 61 6b 3b 0d 0d 09 09 | 09 09 09 09 09 63 61 73 |eak;....|.....cas|
|00000ec0| 65 20 6b 53 65 71 44 6c | 6f 67 5f 41 70 70 65 6e |e kSeqDl|og_Appen|
|00000ed0| 64 49 74 65 6d 3a 0d 09 | 09 09 09 09 09 09 09 41 |dItem:..|.......A|
|00000ee0| 70 70 65 6e 64 53 6f 75 | 6e 64 28 29 3b 0d 09 09 |ppendSou|nd();...|
|00000ef0| 09 09 09 09 09 62 72 65 | 61 6b 3b 0d 0d 09 09 09 |.....bre|ak;.....|
|00000f00| 09 09 09 09 63 61 73 65 | 20 6b 53 65 71 44 6c 6f |....case| kSeqDlo|
|00000f10| 67 5f 52 65 6d 6f 76 65 | 49 74 65 6d 3a 0d 09 09 |g_Remove|Item:...|
|00000f20| 09 09 09 09 09 09 52 65 | 6d 6f 76 65 53 6f 75 6e |......Re|moveSoun|
|00000f30| 64 28 29 3b 0d 09 09 09 | 09 09 09 09 62 72 65 61 |d();....|....brea|
|00000f40| 6b 3b 0d 0d 09 09 09 09 | 09 09 09 63 61 73 65 20 |k;......|...case |
|00000f50| 6b 53 65 71 44 6c 6f 67 | 5f 52 65 6d 6f 76 65 41 |kSeqDlog|_RemoveA|
|00000f60| 6c 6c 49 74 65 6d 3a 0d | 09 09 09 09 09 09 09 09 |llItem:.|........|
|00000f70| 52 65 6d 6f 76 65 41 6c | 6c 53 6f 75 6e 64 73 28 |RemoveAl|lSounds(|
|00000f80| 29 3b 0d 09 09 09 09 09 | 09 09 62 72 65 61 6b 3b |);......|..break;|
|00000f90| 0d 0d 09 09 09 09 09 09 | 09 63 61 73 65 20 6b 53 |........|.case kS|
|00000fa0| 65 71 44 6c 6f 67 5f 50 | 6c 61 79 53 72 63 49 74 |eqDlog_P|laySrcIt|
|00000fb0| 65 6d 3a 0d 09 09 09 09 | 09 09 09 09 53 72 63 50 |em:.....|....SrcP|
|00000fc0| 6c 61 79 53 6f 75 6e 64 | 28 29 3b 0d 09 09 09 09 |laySound|();.....|
|00000fd0| 09 09 09 62 72 65 61 6b | 3b 0d 0d 09 09 09 09 09 |...break|;.......|
|00000fe0| 09 09 63 61 73 65 20 6b | 53 65 71 44 6c 6f 67 5f |..case k|SeqDlog_|
|00000ff0| 4c 6f 6f 70 53 72 63 49 | 74 65 6d 3a 0d 09 09 09 |LoopSrcI|tem:....|
|00001000| 09 09 09 09 09 53 72 63 | 4c 6f 6f 70 53 6f 75 6e |.....Src|LoopSoun|
|00001010| 64 28 29 3b 0d 09 09 09 | 09 09 09 09 62 72 65 61 |d();....|....brea|
|00001020| 6b 3b 0d 0d 09 09 09 09 | 09 09 09 63 61 73 65 20 |k;......|...case |
|00001030| 6b 53 65 71 44 6c 6f 67 | 5f 45 64 69 74 53 72 63 |kSeqDlog|_EditSrc|
|00001040| 49 74 65 6d 3a 0d 09 09 | 09 09 09 09 09 09 53 72 |Item:...|......Sr|
|00001050| 63 45 64 69 74 53 6f 75 | 6e 64 28 29 3b 0d 09 09 |cEditSou|nd();...|
|00001060| 09 09 09 09 09 62 72 65 | 61 6b 3b 0d 0d 09 09 09 |.....bre|ak;.....|
|00001070| 09 09 09 09 63 61 73 65 | 20 6b 53 65 71 44 6c 6f |....case| kSeqDlo|
|00001080| 67 5f 50 6c 61 79 53 65 | 71 49 74 65 6d 3a 0d 09 |g_PlaySe|qItem:..|
|00001090| 09 09 09 09 09 09 09 53 | 65 71 50 6c 61 79 53 6f |.......S|eqPlaySo|
|000010a0| 75 6e 64 28 29 3b 0d 09 | 09 09 09 09 09 09 62 72 |und();..|......br|
|000010b0| 65 61 6b 3b 0d 0d 09 09 | 09 09 09 09 09 63 61 73 |eak;....|.....cas|
|000010c0| 65 20 6b 53 65 71 44 6c | 6f 67 5f 4c 6f 6f 70 53 |e kSeqDl|og_LoopS|
|000010d0| 65 71 49 74 65 6d 3a 0d | 09 09 09 09 09 09 09 09 |eqItem:.|........|
|000010e0| 53 65 71 4c 6f 6f 70 53 | 6f 75 6e 64 28 29 3b 0d |SeqLoopS|ound();.|
|000010f0| 09 09 09 09 09 09 09 62 | 72 65 61 6b 3b 0d 0d 09 |.......b|reak;...|
|00001100| 09 09 09 09 09 09 63 61 | 73 65 20 6b 53 65 71 44 |......ca|se kSeqD|
|00001110| 6c 6f 67 5f 50 6c 61 79 | 4c 6f 6f 70 53 65 71 49 |log_Play|LoopSeqI|
|00001120| 74 65 6d 3a 0d 09 09 09 | 09 09 09 09 09 53 65 71 |tem:....|.....Seq|
|00001130| 50 6c 61 79 53 65 71 75 | 65 6e 63 65 28 29 3b 0d |PlaySequ|ence();.|
|00001140| 09 09 09 09 09 09 09 62 | 72 65 61 6b 3b 0d 0d 09 |.......b|reak;...|
|00001150| 09 09 09 09 09 09 63 61 | 73 65 20 6b 53 65 71 44 |......ca|se kSeqD|
|00001160| 6c 6f 67 5f 56 6f 6c 50 | 69 63 49 74 65 6d 3a 0d |log_VolP|icItem:.|
|00001170| 09 09 09 09 09 09 09 63 | 61 73 65 20 6b 53 65 71 |.......c|ase kSeq|
|00001180| 44 6c 6f 67 5f 56 6f 6c | 54 65 78 74 49 74 65 6d |Dlog_Vol|TextItem|
|00001190| 3a 0d 09 09 09 09 09 09 | 09 63 61 73 65 20 6b 53 |:.......|.case kS|
|000011a0| 65 71 44 6c 6f 67 5f 56 | 6f 6c 54 72 69 49 74 65 |eqDlog_V|olTriIte|
|000011b0| 6d 3a 0d 09 09 09 09 09 | 09 09 63 61 73 65 20 6b |m:......|..case k|
|000011c0| 53 65 71 44 6c 6f 67 5f | 44 75 6d 6d 79 34 49 74 |SeqDlog_|Dummy4It|
|000011d0| 65 6d 3a 20 2f 2f 20 22 | 56 6f 6c 22 20 73 74 61 |em: // "|Vol" sta|
|000011e0| 74 69 63 20 74 65 78 74 | 20 69 74 65 6d 0d 09 09 |tic text| item...|
|000011f0| 09 09 09 09 09 09 43 68 | 61 6e 67 65 53 6f 75 6e |......Ch|angeSoun|
|00001200| 64 56 6f 6c 75 6d 65 28 | 29 3b 0d 09 09 09 09 09 |dVolume(|);......|
|00001210| 09 09 62 72 65 61 6b 3b | 0d 09 09 09 09 09 09 7d |..break;|.......}|
|00001220| 20 2f 2f 20 45 4e 44 20 | 73 77 69 74 63 68 0d 09 | // END |switch..|
|00001230| 09 09 09 09 7d 0d 09 09 | 09 09 7d 0d 09 09 09 7d |....}...|..}....}|
|00001240| 0d 09 09 7d 0d 09 7d 0d | 7d 20 2f 2f 20 45 4e 44 |...}..}.|} // END|
|00001250| 20 6d 61 69 6e 0d 0d 2f | 2f 20 2d 2d 2d 2d 2d 2d | main../|/ ------|
|00001260| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001270| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001290| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000012a0| 2d 2d 2d 2d 2d 0d 0d 2f | 2f 20 49 6e 74 65 72 63 |-----../|/ Interc|
|000012b0| 65 70 74 20 6b 65 79 2d | 64 6f 77 6e 20 65 76 65 |ept key-|down eve|
|000012c0| 6e 74 73 20 62 65 66 6f | 72 65 20 70 61 73 73 69 |nts befo|re passi|
|000012d0| 6e 67 20 74 68 65 6d 20 | 6f 6e 20 74 6f 0d 2f 2f |ng them |on to.//|
|000012e0| 20 44 69 61 6c 6f 67 53 | 65 6c 65 63 74 2e 0d 0d | DialogS|elect...|
|000012f0| 42 6f 6f 6c 65 61 6e 20 | 50 72 6f 63 65 73 73 4b |Boolean |ProcessK|
|00001300| 65 79 44 6f 77 6e 46 69 | 72 73 74 28 45 76 65 6e |eyDownFi|rst(Even|
|00001310| 74 52 65 63 6f 72 64 20 | 2a 74 68 65 45 76 65 6e |tRecord |*theEven|
|00001320| 74 29 20 7b 0d 09 42 6f | 6f 6c 65 61 6e 20 69 73 |t) {..Bo|olean is|
|00001330| 48 61 6e 64 6c 65 64 20 | 3d 20 66 61 6c 73 65 3b |Handled |= false;|
|00001340| 0d 09 63 68 61 72 20 74 | 68 65 4b 65 79 3b 0d 0d |..char t|heKey;..|
|00001350| 09 69 66 20 28 74 68 65 | 45 76 65 6e 74 2d 3e 77 |.if (the|Event->w|
|00001360| 68 61 74 20 3d 3d 20 6b | 65 79 44 6f 77 6e 29 20 |hat == k|eyDown) |
|00001370| 7b 0d 09 09 74 68 65 4b | 65 79 20 3d 20 74 68 65 |{...theK|ey = the|
|00001380| 45 76 65 6e 74 2d 3e 6d | 65 73 73 61 67 65 20 26 |Event->m|essage &|
|00001390| 20 63 68 61 72 43 6f 64 | 65 4d 61 73 6b 3b 0d 0d | charCod|eMask;..|
|000013a0| 09 09 69 66 20 28 28 74 | 68 65 4b 65 79 20 21 3d |..if ((t|heKey !=|
|000013b0| 20 33 30 20 26 26 20 74 | 68 65 4b 65 79 20 21 3d | 30 && t|heKey !=|
|000013c0| 20 33 31 29 20 26 26 20 | 28 28 74 68 65 45 76 65 | 31) && |((theEve|
|000013d0| 6e 74 2d 3e 6d 6f 64 69 | 66 69 65 72 73 20 26 20 |nt->modi|fiers & |
|000013e0| 63 6d 64 4b 65 79 29 20 | 21 3d 20 30 29 29 20 7b |cmdKey) |!= 0)) {|
|000013f0| 0d 09 09 09 48 61 6e 64 | 6c 65 4d 65 6e 75 28 4d |....Hand|leMenu(M|
|00001400| 65 6e 75 4b 65 79 28 74 | 68 65 4b 65 79 29 29 3b |enuKey(t|heKey));|
|00001410| 0d 09 09 09 69 73 48 61 | 6e 64 6c 65 64 20 3d 20 |....isHa|ndled = |
|00001420| 74 72 75 65 3b 0d 09 09 | 7d 0d 09 09 65 6c 73 65 |true;...|}...else|
|00001430| 20 7b 0d 09 09 09 43 65 | 6c 6c 20 63 65 6c 6c 20 | {....Ce|ll cell |
|00001440| 3d 20 7b 20 30 2c 20 30 | 20 7d 3b 0d 09 09 09 42 |= { 0, 0| };....B|
|00001450| 6f 6f 6c 65 61 6e 20 73 | 65 6c 65 63 74 69 6f 6e |oolean s|election|
|00001460| 3b 0d 09 09 09 0d 09 09 | 09 73 65 6c 65 63 74 69 |;.......|.selecti|
|00001470| 6f 6e 20 3d 20 4c 47 65 | 74 53 65 6c 65 63 74 28 |on = LGe|tSelect(|
|00001480| 74 72 75 65 2c 20 26 63 | 65 6c 6c 2c 20 67 43 75 |true, &c|ell, gCu|
|00001490| 72 72 65 6e 74 4c 69 73 | 74 29 3b 0d 0d 09 09 09 |rrentLis|t);.....|
|000014a0| 73 77 69 74 63 68 28 74 | 68 65 4b 65 79 29 20 7b |switch(t|heKey) {|
|000014b0| 0d 09 09 09 09 63 61 73 | 65 20 39 3a 0d 09 09 09 |.....cas|e 9:....|
|000014c0| 09 09 2f 2f 20 54 61 62 | 2e 20 53 77 69 74 63 68 |..// Tab|. Switch|
|000014d0| 20 73 65 6c 65 63 74 65 | 64 20 6c 69 73 74 0d 09 | selecte|d list..|
|000014e0| 09 09 09 09 69 66 20 28 | 67 43 75 72 72 65 6e 74 |....if (|gCurrent|
|000014f0| 4c 69 73 74 20 3d 3d 20 | 67 53 6f 75 6e 64 73 4c |List == |gSoundsL|
|00001500| 69 73 74 29 0d 09 09 09 | 09 09 09 67 43 75 72 72 |ist)....|...gCurr|
|00001510| 65 6e 74 4c 69 73 74 20 | 3d 20 67 53 65 71 75 65 |entList |= gSeque|
|00001520| 6e 63 65 72 4c 69 73 74 | 3b 0d 09 09 09 09 09 65 |ncerList|;......e|
|00001530| 6c 73 65 0d 09 09 09 09 | 09 09 67 43 75 72 72 65 |lse.....|..gCurre|
|00001540| 6e 74 4c 69 73 74 20 3d | 20 67 53 6f 75 6e 64 73 |ntList =| gSounds|
|00001550| 4c 69 73 74 3b 0d 09 09 | 09 09 09 55 70 64 61 74 |List;...|...Updat|
|00001560| 65 4c 69 73 74 53 65 6c | 65 63 74 65 64 28 29 3b |eListSel|ected();|
|00001570| 0d 09 09 09 09 09 69 73 | 48 61 6e 64 6c 65 64 20 |......is|Handled |
|00001580| 3d 20 74 72 75 65 3b 0d | 09 09 09 09 62 72 65 61 |= true;.|....brea|
|00001590| 6b 3b 0d 09 09 09 09 0d | 09 09 09 09 63 61 73 65 |k;......|....case|
|000015a0| 20 31 33 3a 09 2f 2f 20 | 43 61 72 72 69 61 67 65 | 13:.// |Carriage|
|000015b0| 20 72 65 74 75 72 6e 0d | 09 09 09 09 09 69 66 20 | return.|.....if |
|000015c0| 28 73 65 6c 65 63 74 69 | 6f 6e 29 20 7b 0d 09 09 |(selecti|on) {...|
|000015d0| 09 09 09 09 69 66 20 28 | 67 43 75 72 72 65 6e 74 |....if (|gCurrent|
|000015e0| 4c 69 73 74 20 3d 3d 20 | 67 53 6f 75 6e 64 73 4c |List == |gSoundsL|
|000015f0| 69 73 74 29 20 7b 0d 09 | 09 09 09 09 09 09 69 66 |ist) {..|......if|
|00001600| 20 28 4f 70 74 69 6f 6e | 4b 65 79 44 6f 77 6e 28 | (Option|KeyDown(|
|00001610| 29 29 20 7b 0d 09 09 09 | 09 09 09 09 09 50 75 73 |)) {....|.....Pus|
|00001620| 68 42 75 74 74 6f 6e 28 | 67 53 65 71 75 65 6e 63 |hButton(|gSequenc|
|00001630| 65 72 44 6c 6f 67 2c 20 | 6b 53 65 71 44 6c 6f 67 |erDlog, |kSeqDlog|
|00001640| 5f 49 6e 73 65 72 74 49 | 74 65 6d 29 3b 0d 09 09 |_InsertI|tem);...|
|00001650| 09 09 09 09 09 09 49 6e | 73 65 72 74 53 6f 75 6e |......In|sertSoun|
|00001660| 64 28 29 3b 0d 09 09 09 | 09 09 09 09 7d 0d 09 09 |d();....|....}...|
|00001670| 09 09 09 09 09 65 6c 73 | 65 20 7b 0d 09 09 09 09 |.....els|e {.....|
|00001680| 09 09 09 09 50 75 73 68 | 42 75 74 74 6f 6e 28 67 |....Push|Button(g|
|00001690| 53 65 71 75 65 6e 63 65 | 72 44 6c 6f 67 2c 20 6b |Sequence|rDlog, k|
|000016a0| 53 65 71 44 6c 6f 67 5f | 50 6c 61 79 53 72 63 49 |SeqDlog_|PlaySrcI|
|000016b0| 74 65 6d 29 3b 0d 09 09 | 09 09 09 09 09 09 53 72 |tem);...|......Sr|
|000016c0| 63 50 6c 61 79 53 6f 75 | 6e 64 28 29 3b 0d 09 09 |cPlaySou|nd();...|
|000016d0| 09 09 09 09 09 7d 0d 09 | 09 09 09 09 09 7d 0d 09 |.....}..|.....}..|
|000016e0| 09 09 09 09 09 65 6c 73 | 65 20 7b 0d 09 09 09 09 |.....els|e {.....|
|000016f0| 09 09 09 50 75 73 68 42 | 75 74 74 6f 6e 28 67 53 |...PushB|utton(gS|
|00001700| 65 71 75 65 6e 63 65 72 | 44 6c 6f 67 2c 20 6b 53 |equencer|Dlog, kS|
|00001710| 65 71 44 6c 6f 67 5f 50 | 6c 61 79 53 65 71 49 74 |eqDlog_P|laySeqIt|
|00001720| 65 6d 29 3b 0d 09 09 09 | 09 09 09 09 53 65 71 50 |em);....|....SeqP|
|00001730| 6c 61 79 53 6f 75 6e 64 | 28 29 3b 0d 09 09 09 09 |laySound|();.....|
|00001740| 09 09 7d 0d 09 09 09 09 | 09 09 69 73 48 61 6e 64 |..}.....|..isHand|
|00001750| 6c 65 64 20 3d 20 74 72 | 75 65 3b 0d 09 09 09 09 |led = tr|ue;.....|
|00001760| 09 7d 0d 09 09 09 09 62 | 72 65 61 6b 3b 0d 0d 09 |.}.....b|reak;...|
|00001770| 09 09 09 63 61 73 65 20 | 33 3a 09 2f 2f 20 45 6e |...case |3:.// En|
|00001780| 74 65 72 20 6b 65 79 0d | 09 09 09 09 09 69 66 20 |ter key.|.....if |
|00001790| 28 73 65 6c 65 63 74 69 | 6f 6e 29 20 7b 0d 09 09 |(selecti|on) {...|
|000017a0| 09 09 09 09 69 66 20 28 | 67 43 75 72 72 65 6e 74 |....if (|gCurrent|
|000017b0| 4c 69 73 74 20 3d 3d 20 | 67 53 6f 75 6e 64 73 4c |List == |gSoundsL|
|000017c0| 69 73 74 29 20 7b 0d 09 | 09 09 09 09 09 09 69 66 |ist) {..|......if|
|000017d0| 20 28 4f 70 74 69 6f 6e | 4b 65 79 44 6f 77 6e 28 | (Option|KeyDown(|
|000017e0| 29 29 20 7b 0d 09 09 09 | 09 09 09 09 09 50 75 73 |)) {....|.....Pus|
|000017f0| 68 42 75 74 74 6f 6e 28 | 67 53 65 71 75 65 6e 63 |hButton(|gSequenc|
|00001800| 65 72 44 6c 6f 67 2c 20 | 6b 53 65 71 44 6c 6f 67 |erDlog, |kSeqDlog|
|00001810| 5f 41 70 70 65 6e 64 49 | 74 65 6d 29 3b 0d 09 09 |_AppendI|tem);...|
|00001820| 09 09 09 09 09 09 41 70 | 70 65 6e 64 53 6f 75 6e |......Ap|pendSoun|
|00001830| 64 28 29 3b 0d 09 09 09 | 09 09 09 09 7d 0d 09 09 |d();....|....}...|
|00001840| 09 09 09 09 09 65 6c 73 | 65 20 7b 0d 09 09 09 09 |.....els|e {.....|
|00001850| 09 09 09 09 50 75 73 68 | 42 75 74 74 6f 6e 28 67 |....Push|Button(g|
|00001860| 53 65 71 75 65 6e 63 65 | 72 44 6c 6f 67 2c 20 6b |Sequence|rDlog, k|
|00001870| 53 65 71 44 6c 6f 67 5f | 4c 6f 6f 70 53 72 63 49 |SeqDlog_|LoopSrcI|
|00001880| 74 65 6d 29 3b 0d 09 09 | 09 09 09 09 09 09 53 72 |tem);...|......Sr|
|00001890| 63 4c 6f 6f 70 53 6f 75 | 6e 64 28 29 3b 0d 09 09 |cLoopSou|nd();...|
|000018a0| 09 09 09 09 09 7d 0d 09 | 09 09 09 09 09 7d 0d 09 |.....}..|.....}..|
|000018b0| 09 09 09 09 09 65 6c 73 | 65 20 7b 0d 09 09 09 09 |.....els|e {.....|
|000018c0| 09 09 09 50 75 73 68 42 | 75 74 74 6f 6e 28 67 53 |...PushB|utton(gS|
|000018d0| 65 71 75 65 6e 63 65 72 | 44 6c 6f 67 2c 20 6b 53 |equencer|Dlog, kS|
|000018e0| 65 71 44 6c 6f 67 5f 4c | 6f 6f 70 53 65 71 49 74 |eqDlog_L|oopSeqIt|
|000018f0| 65 6d 29 3b 0d 09 09 09 | 09 09 09 09 53 65 71 4c |em);....|....SeqL|
|00001900| 6f 6f 70 53 6f 75 6e 64 | 28 29 3b 0d 09 09 09 09 |oopSound|();.....|
|00001910| 09 09 7d 0d 09 09 09 09 | 09 09 69 73 48 61 6e 64 |..}.....|..isHand|
|00001920| 6c 65 64 20 3d 20 74 72 | 75 65 3b 0d 09 09 09 09 |led = tr|ue;.....|
|00001930| 09 7d 0d 09 09 09 09 62 | 72 65 61 6b 3b 0d 0d 09 |.}.....b|reak;...|
|00001940| 09 09 09 63 61 73 65 20 | 38 3a 09 2f 2f 20 44 65 |...case |8:.// De|
|00001950| 6c 65 74 65 20 6b 65 79 | 0d 09 09 09 09 09 69 66 |lete key|......if|
|00001960| 20 28 73 65 6c 65 63 74 | 69 6f 6e 20 26 26 20 67 | (select|ion && g|
|00001970| 43 75 72 72 65 6e 74 4c | 69 73 74 20 3d 3d 20 67 |CurrentL|ist == g|
|00001980| 53 65 71 75 65 6e 63 65 | 72 4c 69 73 74 29 20 7b |Sequence|rList) {|
|00001990| 0d 09 09 09 09 09 09 69 | 66 20 28 4f 70 74 69 6f |.......i|f (Optio|
|000019a0| 6e 4b 65 79 44 6f 77 6e | 28 29 29 20 7b 0d 09 09 |nKeyDown|()) {...|
|000019b0| 09 09 09 09 09 50 75 73 | 68 42 75 74 74 6f 6e 28 |.....Pus|hButton(|
|000019c0| 67 53 65 71 75 65 6e 63 | 65 72 44 6c 6f 67 2c 20 |gSequenc|erDlog, |
|000019d0| 6b 53 65 71 44 6c 6f 67 | 5f 52 65 6d 6f 76 65 41 |kSeqDlog|_RemoveA|
|000019e0| 6c 6c 49 74 65 6d 29 3b | 0d 09 09 09 09 09 09 09 |llItem);|........|
|000019f0| 52 65 6d 6f 76 65 41 6c | 6c 53 6f 75 6e 64 73 28 |RemoveAl|lSounds(|
|00001a00| 29 3b 0d 09 09 09 09 09 | 09 7d 0d 09 09 09 09 09 |);......|.}......|
|00001a10| 09 65 6c 73 65 20 7b 0d | 09 09 09 09 09 09 09 50 |.else {.|.......P|
|00001a20| 75 73 68 42 75 74 74 6f | 6e 28 67 53 65 71 75 65 |ushButto|n(gSeque|
|00001a30| 6e 63 65 72 44 6c 6f 67 | 2c 20 6b 53 65 71 44 6c |ncerDlog|, kSeqDl|
|00001a40| 6f 67 5f 52 65 6d 6f 76 | 65 49 74 65 6d 29 3b 0d |og_Remov|eItem);.|
|00001a50| 09 09 09 09 09 09 09 52 | 65 6d 6f 76 65 53 6f 75 |.......R|emoveSou|
|00001a60| 6e 64 28 29 3b 0d 09 09 | 09 09 09 09 7d 0d 09 09 |nd();...|....}...|
|00001a70| 09 09 09 09 69 73 48 61 | 6e 64 6c 65 64 20 3d 20 |....isHa|ndled = |
|00001a80| 74 72 75 65 3b 0d 09 09 | 09 09 09 7d 0d 09 09 09 |true;...|...}....|
|00001a90| 09 62 72 65 61 6b 3b 0d | 0d 09 09 09 09 63 61 73 |.break;.|.....cas|
|00001aa0| 65 20 33 30 3a 09 2f 2f | 20 55 70 20 61 72 72 6f |e 30:.//| Up arro|
|00001ab0| 77 20 6b 65 79 0d 09 09 | 09 09 09 69 66 20 28 73 |w key...|...if (s|
|00001ac0| 65 6c 65 63 74 69 6f 6e | 29 20 7b 0d 09 09 09 09 |election|) {.....|
|00001ad0| 09 09 69 66 20 28 63 65 | 6c 6c 2e 76 20 3e 20 30 |..if (ce|ll.v > 0|
|00001ae0| 29 20 7b 0d 09 09 09 09 | 09 09 09 09 2f 2f 20 44 |) {.....|....// D|
|00001af0| 65 2d 73 65 6c 65 63 74 | 20 6f 6c 64 20 63 65 6c |e-select| old cel|
|00001b00| 6c 0d 09 09 09 09 09 09 | 09 4c 53 65 74 53 65 6c |l.......|.LSetSel|
|00001b10| 65 63 74 28 66 61 6c 73 | 65 2c 20 63 65 6c 6c 2c |ect(fals|e, cell,|
|00001b20| 20 67 43 75 72 72 65 6e | 74 4c 69 73 74 29 3b 0d | gCurren|tList);.|
|00001b30| 09 09 09 09 09 09 09 09 | 2f 2f 20 4d 6f 76 65 20 |........|// Move |
|00001b40| 75 70 2c 20 26 20 73 65 | 6c 65 63 74 20 6e 65 77 |up, & se|lect new|
|00001b50| 20 63 65 6c 6c 0d 09 09 | 09 09 09 09 09 69 66 20 | cell...|.....if |
|00001b60| 28 43 6d 64 4b 65 79 44 | 6f 77 6e 28 29 29 0d 09 |(CmdKeyD|own())..|
|00001b70| 09 09 09 09 09 09 09 63 | 65 6c 6c 2e 76 20 3d 20 |.......c|ell.v = |
|00001b80| 30 3b 0d 09 09 09 09 09 | 09 09 65 6c 73 65 0d 09 |0;......|..else..|
|00001b90| 09 09 09 09 09 09 09 63 | 65 6c 6c 2e 76 2d 2d 3b |.......c|ell.v--;|
|00001ba0| 0d 09 09 09 09 09 09 09 | 4c 53 65 74 53 65 6c 65 |........|LSetSele|
|00001bb0| 63 74 28 74 72 75 65 2c | 20 63 65 6c 6c 2c 20 67 |ct(true,| cell, g|
|00001bc0| 43 75 72 72 65 6e 74 4c | 69 73 74 29 3b 0d 09 09 |CurrentL|ist);...|
|00001bd0| 09 09 09 09 09 69 66 20 | 28 67 43 75 72 72 65 6e |.....if |(gCurren|
|00001be0| 74 4c 69 73 74 20 3d 3d | 20 67 53 6f 75 6e 64 73 |tList ==| gSounds|
|00001bf0| 4c 69 73 74 29 0d 09 09 | 09 09 09 09 09 09 55 70 |List)...|......Up|
|00001c00| 64 61 74 65 53 6f 75 6e | 64 73 43 6f 6e 74 72 6f |dateSoun|dsContro|
|00001c10| 6c 73 28 29 3b 0d 09 09 | 09 09 09 09 09 69 73 48 |ls();...|.....isH|
|00001c20| 61 6e 64 6c 65 64 20 3d | 20 74 72 75 65 3b 0d 09 |andled =| true;..|
|00001c30| 09 09 09 09 09 7d 0d 09 | 09 09 09 09 7d 0d 09 09 |.....}..|....}...|
|00001c40| 09 09 62 72 65 61 6b 3b | 0d 09 09 09 09 0d 09 09 |..break;|........|
|00001c50| 09 09 63 61 73 65 20 33 | 31 3a 09 2f 2f 20 44 6f |..case 3|1:.// Do|
|00001c60| 77 6e 20 61 72 72 6f 77 | 20 6b 65 79 0d 09 09 09 |wn arrow| key....|
|00001c70| 09 09 69 66 20 28 73 65 | 6c 65 63 74 69 6f 6e 29 |..if (se|lection)|
|00001c80| 20 7b 0d 09 09 09 09 09 | 09 69 66 20 28 63 65 6c | {......|.if (cel|
|00001c90| 6c 2e 76 20 3c 20 28 2a | 2a 67 43 75 72 72 65 6e |l.v < (*|*gCurren|
|00001ca0| 74 4c 69 73 74 29 2e 64 | 61 74 61 42 6f 75 6e 64 |tList).d|ataBound|
|00001cb0| 73 2e 62 6f 74 74 6f 6d | 20 2d 20 31 29 20 7b 0d |s.bottom| - 1) {.|
|00001cc0| 09 09 09 09 09 09 09 09 | 2f 2f 20 44 65 2d 73 65 |........|// De-se|
|00001cd0| 6c 65 63 74 20 6f 6c 64 | 20 63 65 6c 6c 0d 09 09 |lect old| cell...|
|00001ce0| 09 09 09 09 09 4c 53 65 | 74 53 65 6c 65 63 74 28 |.....LSe|tSelect(|
|00001cf0| 66 61 6c 73 65 2c 20 63 | 65 6c 6c 2c 20 67 43 75 |false, c|ell, gCu|
|00001d00| 72 72 65 6e 74 4c 69 73 | 74 29 3b 0d 09 09 09 09 |rrentLis|t);.....|
|00001d10| 09 09 09 09 2f 2f 20 4d | 6f 76 65 20 64 6f 77 6e |....// M|ove down|
|00001d20| 20 26 20 73 65 6c 65 63 | 74 0d 09 09 09 09 09 09 | & selec|t.......|
|00001d30| 09 69 66 20 28 43 6d 64 | 4b 65 79 44 6f 77 6e 28 |.if (Cmd|KeyDown(|
|00001d40| 29 29 0d 09 09 09 09 09 | 09 09 09 63 65 6c 6c 2e |))......|...cell.|
|00001d50| 76 20 3d 20 28 2a 2a 67 | 43 75 72 72 65 6e 74 4c |v = (**g|CurrentL|
|00001d60| 69 73 74 29 2e 64 61 74 | 61 42 6f 75 6e 64 73 2e |ist).dat|aBounds.|
|00001d70| 62 6f 74 74 6f 6d 20 2d | 20 31 3b 0d 09 09 09 09 |bottom -| 1;.....|
|00001d80| 09 09 09 65 6c 73 65 0d | 09 09 09 09 09 09 09 09 |...else.|........|
|00001d90| 63 65 6c 6c 2e 76 2b 2b | 3b 0d 09 09 09 09 09 09 |cell.v++|;.......|
|00001da0| 09 4c 53 65 74 53 65 6c | 65 63 74 28 74 72 75 65 |.LSetSel|ect(true|
|00001db0| 2c 20 63 65 6c 6c 2c 20 | 67 43 75 72 72 65 6e 74 |, cell, |gCurrent|
|00001dc0| 4c 69 73 74 29 3b 0d 09 | 09 09 09 09 09 09 69 66 |List);..|......if|
|00001dd0| 20 28 67 43 75 72 72 65 | 6e 74 4c 69 73 74 20 3d | (gCurre|ntList =|
|00001de0| 3d 20 67 53 6f 75 6e 64 | 73 4c 69 73 74 29 0d 09 |= gSound|sList)..|
|00001df0| 09 09 09 09 09 09 09 55 | 70 64 61 74 65 53 6f 75 |.......U|pdateSou|
|00001e00| 6e 64 73 43 6f 6e 74 72 | 6f 6c 73 28 29 3b 0d 09 |ndsContr|ols();..|
|00001e10| 09 09 09 09 09 09 69 73 | 48 61 6e 64 6c 65 64 20 |......is|Handled |
|00001e20| 3d 20 74 72 75 65 3b 0d | 09 09 09 09 09 09 7d 0d |= true;.|......}.|
|00001e30| 09 09 09 09 09 7d 0d 09 | 09 09 09 62 72 65 61 6b |.....}..|...break|
|00001e40| 3b 0d 0d 09 09 09 09 09 | 2f 2f 20 50 6c 61 79 20 |;.......|// Play |
|00001e50| 73 65 71 75 65 6e 63 65 | 0d 09 09 09 09 63 61 73 |sequence|.....cas|
|00001e60| 65 20 27 73 27 3a 20 63 | 61 73 65 20 27 53 27 3a |e 's': c|ase 'S':|
|00001e70| 0d 09 09 09 09 09 2f 2f | 20 4e 6f 20 6d 61 74 74 |......//| No matt|
|00001e80| 65 72 20 77 68 61 74 20 | 6c 69 73 74 20 69 73 20 |er what |list is |
|00001e90| 73 65 6c 65 63 74 65 64 | 2c 20 74 68 69 73 20 6b |selected|, this k|
|00001ea0| 65 79 20 6f 6e 6c 79 20 | 61 70 70 6c 69 65 73 0d |ey only |applies.|
|00001eb0| 09 09 09 09 09 2f 2f 20 | 74 6f 20 73 65 71 75 65 |.....// |to seque|
|00001ec0| 6e 63 65 72 20 6c 69 73 | 74 2c 20 61 6e 64 20 69 |ncer lis|t, and i|
|00001ed0| 73 20 61 63 74 69 76 65 | 20 6f 6e 6c 79 20 69 66 |s active| only if|
|00001ee0| 20 74 68 65 20 6c 69 73 | 74 0d 09 09 09 09 09 2f | the lis|t....../|
|00001ef0| 2f 20 68 61 73 20 31 20 | 6f 72 20 6d 6f 72 65 20 |/ has 1 |or more |
|00001f00| 69 74 65 6d 73 20 74 6f | 20 70 6c 61 79 20 69 6e |items to| play in|
|00001f10| 20 73 65 71 75 65 6e 63 | 65 2e 2e 2e 0d 09 09 09 | sequenc|e.......|
|00001f20| 09 09 69 66 20 28 28 2a | 2a 67 53 65 71 75 65 6e |..if ((*|*gSequen|
|00001f30| 63 65 72 4c 69 73 74 29 | 2e 64 61 74 61 42 6f 75 |cerList)|.dataBou|
|00001f40| 6e 64 73 2e 62 6f 74 74 | 6f 6d 20 3e 20 30 29 20 |nds.bott|om > 0) |
|00001f50| 7b 0d 09 09 09 09 09 09 | 50 75 73 68 42 75 74 74 |{.......|PushButt|
|00001f60| 6f 6e 28 67 53 65 71 75 | 65 6e 63 65 72 44 6c 6f |on(gSequ|encerDlo|
|00001f70| 67 2c 20 6b 53 65 71 44 | 6c 6f 67 5f 50 6c 61 79 |g, kSeqD|log_Play|
|00001f80| 4c 6f 6f 70 53 65 71 49 | 74 65 6d 29 3b 0d 09 09 |LoopSeqI|tem);...|
|00001f90| 09 09 09 09 53 65 71 50 | 6c 61 79 53 65 71 75 65 |....SeqP|laySeque|
|00001fa0| 6e 63 65 28 29 3b 0d 09 | 09 09 09 09 7d 0d 09 09 |nce();..|....}...|
|00001fb0| 09 09 62 72 65 61 6b 3b | 0d 0d 09 09 09 09 2f 2f |..break;|......//|
|00001fc0| 20 50 6c 61 79 20 73 6f | 75 6e 64 0d 09 09 09 09 | Play so|und.....|
|00001fd0| 63 61 73 65 20 27 70 27 | 3a 20 63 61 73 65 20 27 |case 'p'|: case '|
|00001fe0| 50 27 3a 0d 09 09 09 09 | 09 69 66 20 28 73 65 6c |P':.....|.if (sel|
|00001ff0| 65 63 74 69 6f 6e 29 20 | 7b 0d 09 09 09 09 09 09 |ection) |{.......|
|00002000| 69 66 20 28 67 43 75 72 | 72 65 6e 74 4c 69 73 74 |if (gCur|rentList|
|00002010| 20 3d 3d 20 67 53 6f 75 | 6e 64 73 4c 69 73 74 29 | == gSou|ndsList)|
|00002020| 20 7b 0d 09 09 09 09 09 | 09 09 50 75 73 68 42 75 | {......|..PushBu|
|00002030| 74 74 6f 6e 28 67 53 65 | 71 75 65 6e 63 65 72 44 |tton(gSe|quencerD|
|00002040| 6c 6f 67 2c 20 6b 53 65 | 71 44 6c 6f 67 5f 50 6c |log, kSe|qDlog_Pl|
|00002050| 61 79 53 72 63 49 74 65 | 6d 29 3b 0d 09 09 09 09 |aySrcIte|m);.....|
|00002060| 09 09 09 53 72 63 50 6c | 61 79 53 6f 75 6e 64 28 |...SrcPl|aySound(|
|00002070| 29 3b 0d 09 09 09 09 09 | 09 7d 0d 09 09 09 09 09 |);......|.}......|
|00002080| 09 65 6c 73 65 20 7b 0d | 09 09 09 09 09 09 09 50 |.else {.|.......P|
|00002090| 75 73 68 42 75 74 74 6f | 6e 28 67 53 65 71 75 65 |ushButto|n(gSeque|
|000020a0| 6e 63 65 72 44 6c 6f 67 | 2c 20 6b 53 65 71 44 6c |ncerDlog|, kSeqDl|
|000020b0| 6f 67 5f 50 6c 61 79 53 | 65 71 49 74 65 6d 29 3b |og_PlayS|eqItem);|
|000020c0| 0d 09 09 09 09 09 09 09 | 53 65 71 50 6c 61 79 53 |........|SeqPlayS|
|000020d0| 6f 75 6e 64 28 29 3b 0d | 09 09 09 09 09 09 7d 0d |ound();.|......}.|
|000020e0| 09 09 09 09 09 7d 0d 09 | 09 09 09 62 72 65 61 6b |.....}..|...break|
|000020f0| 3b 0d 0d 09 09 09 09 2f | 2f 20 4c 6f 6f 70 20 73 |;....../|/ Loop s|
|00002100| 6f 75 6e 64 0d 09 09 09 | 09 63 61 73 65 20 27 6c |ound....|.case 'l|
|00002110| 27 3a 20 63 61 73 65 20 | 27 4c 27 3a 0d 09 09 09 |': case |'L':....|
|00002120| 09 09 69 66 20 28 73 65 | 6c 65 63 74 69 6f 6e 29 |..if (se|lection)|
|00002130| 20 7b 0d 09 09 09 09 09 | 09 69 66 20 28 67 43 75 | {......|.if (gCu|
|00002140| 72 72 65 6e 74 4c 69 73 | 74 20 3d 3d 20 67 53 6f |rrentLis|t == gSo|
|00002150| 75 6e 64 73 4c 69 73 74 | 29 20 7b 0d 09 09 09 09 |undsList|) {.....|
|00002160| 09 09 09 50 75 73 68 42 | 75 74 74 6f 6e 28 67 53 |...PushB|utton(gS|
|00002170| 65 71 75 65 6e 63 65 72 | 44 6c 6f 67 2c 20 6b 53 |equencer|Dlog, kS|
|00002180| 65 71 44 6c 6f 67 5f 4c | 6f 6f 70 53 72 63 49 74 |eqDlog_L|oopSrcIt|
|00002190| 65 6d 29 3b 0d 09 09 09 | 09 09 09 09 53 72 63 4c |em);....|....SrcL|
|000021a0| 6f 6f 70 53 6f 75 6e 64 | 28 29 3b 0d 09 09 09 09 |oopSound|();.....|
|000021b0| 09 09 7d 0d 09 09 09 09 | 09 09 65 6c 73 65 20 7b |..}.....|..else {|
|000021c0| 0d 09 09 09 09 09 09 09 | 50 75 73 68 42 75 74 74 |........|PushButt|
|000021d0| 6f 6e 28 67 53 65 71 75 | 65 6e 63 65 72 44 6c 6f |on(gSequ|encerDlo|
|000021e0| 67 2c 20 6b 53 65 71 44 | 6c 6f 67 5f 4c 6f 6f 70 |g, kSeqD|log_Loop|
|000021f0| 53 65 71 49 74 65 6d 29 | 3b 0d 09 09 09 09 09 09 |SeqItem)|;.......|
|00002200| 09 53 65 71 4c 6f 6f 70 | 53 6f 75 6e 64 28 29 3b |.SeqLoop|Sound();|
|00002210| 0d 09 09 09 09 09 09 7d | 0d 09 09 09 09 09 7d 0d |.......}|......}.|
|00002220| 09 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 09 7d 20 |....brea|k;....} |
|00002230| 2f 2f 20 45 4e 44 20 73 | 77 69 74 63 68 0d 09 09 |// END s|witch...|
|00002240| 7d 0d 09 7d 0d 09 72 65 | 74 75 72 6e 28 69 73 48 |}..}..re|turn(isH|
|00002250| 61 6e 64 6c 65 64 29 3b | 0d 7d 20 2f 2f 20 45 4e |andled);|.} // EN|
|00002260| 44 20 50 72 6f 63 65 73 | 73 4b 65 79 44 6f 77 6e |D Proces|sKeyDown|
|00002270| 46 69 72 73 74 0d 0d 2f | 2f 20 2d 2d 2d 2d 2d 2d |First../|/ ------|
|00002280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002290| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022c0| 2d 2d 2d 2d 2d 0d 0d 76 | 6f 69 64 20 48 61 6e 64 |-----..v|oid Hand|
|000022d0| 6c 65 45 76 65 6e 74 28 | 45 76 65 6e 74 52 65 63 |leEvent(|EventRec|
|000022e0| 6f 72 64 20 2a 74 68 65 | 45 76 65 6e 74 29 20 7b |ord *the|Event) {|
|000022f0| 0d 09 57 69 6e 64 6f 77 | 50 74 72 20 74 68 65 57 |..Window|Ptr theW|
|00002300| 69 6e 64 6f 77 3b 0d 0d | 09 73 77 69 74 63 68 28 |indow;..|.switch(|
|00002310| 74 68 65 45 76 65 6e 74 | 2d 3e 77 68 61 74 29 20 |theEvent|->what) |
|00002320| 7b 0d 09 09 63 61 73 65 | 20 6d 6f 75 73 65 44 6f |{...case| mouseDo|
|00002330| 77 6e 3a 0d 09 09 09 73 | 68 6f 72 74 20 70 61 72 |wn:....s|hort par|
|00002340| 74 3b 0d 0d 09 09 09 70 | 61 72 74 20 3d 20 46 69 |t;.....p|art = Fi|
|00002350| 6e 64 57 69 6e 64 6f 77 | 28 74 68 65 45 76 65 6e |ndWindow|(theEven|
|00002360| 74 2d 3e 77 68 65 72 65 | 2c 20 26 74 68 65 57 69 |t->where|, &theWi|
|00002370| 6e 64 6f 77 29 3b 0d 0d | 09 09 09 73 77 69 74 63 |ndow);..|...switc|
|00002380| 68 28 70 61 72 74 29 20 | 7b 0d 09 09 09 09 63 61 |h(part) |{.....ca|
|00002390| 73 65 20 69 6e 4d 65 6e | 75 42 61 72 3a 0d 09 09 |se inMen|uBar:...|
|000023a0| 09 09 09 48 61 6e 64 6c | 65 4d 65 6e 75 28 4d 65 |...Handl|eMenu(Me|
|000023b0| 6e 75 53 65 6c 65 63 74 | 28 74 68 65 45 76 65 6e |nuSelect|(theEven|
|000023c0| 74 2d 3e 77 68 65 72 65 | 29 29 3b 0d 09 09 09 09 |t->where|));.....|
|000023d0| 62 72 65 61 6b 3b 0d 0d | 09 09 09 09 63 61 73 65 |break;..|....case|
|000023e0| 20 69 6e 53 79 73 57 69 | 6e 64 6f 77 3a 0d 09 09 | inSysWi|ndow:...|
|000023f0| 09 09 09 53 79 73 74 65 | 6d 43 6c 69 63 6b 28 74 |...Syste|mClick(t|
|00002400| 68 65 45 76 65 6e 74 2c | 20 74 68 65 57 69 6e 64 |heEvent,| theWind|
|00002410| 6f 77 29 3b 0d 09 09 09 | 09 62 72 65 61 6b 3b 0d |ow);....|.break;.|
|00002420| 0d 09 09 09 09 63 61 73 | 65 20 69 6e 47 6f 41 77 |.....cas|e inGoAw|
|00002430| 61 79 3a 0d 09 09 09 09 | 09 69 66 20 28 54 72 61 |ay:.....|.if (Tra|
|00002440| 63 6b 47 6f 41 77 61 79 | 28 74 68 65 57 69 6e 64 |ckGoAway|(theWind|
|00002450| 6f 77 2c 20 74 68 65 45 | 76 65 6e 74 2d 3e 77 68 |ow, theE|vent->wh|
|00002460| 65 72 65 29 29 20 7b 0d | 09 09 09 09 09 09 51 75 |ere)) {.|......Qu|
|00002470| 69 74 41 6e 64 43 6c 65 | 61 6e 75 70 28 29 3b 0d |itAndCle|anup();.|
|00002480| 09 09 09 09 09 7d 0d 09 | 09 09 09 62 72 65 61 6b |.....}..|...break|
|00002490| 3b 0d 0d 09 09 09 09 63 | 61 73 65 20 69 6e 44 72 |;......c|ase inDr|
|000024a0| 61 67 3a 0d 09 09 09 09 | 09 52 65 63 74 20 64 72 |ag:.....|.Rect dr|
|000024b0| 61 67 42 6f 75 6e 64 73 | 3b 0d 09 09 09 09 09 64 |agBounds|;......d|
|000024c0| 72 61 67 42 6f 75 6e 64 | 73 20 3d 20 28 2a 2a 47 |ragBound|s = (**G|
|000024d0| 65 74 47 72 61 79 52 67 | 6e 28 29 29 2e 72 67 6e |etGrayRg|n()).rgn|
|000024e0| 42 42 6f 78 3b 0d 09 09 | 09 09 09 44 72 61 67 57 |BBox;...|...DragW|
|000024f0| 69 6e 64 6f 77 28 74 68 | 65 57 69 6e 64 6f 77 2c |indow(th|eWindow,|
|00002500| 20 74 68 65 45 76 65 6e | 74 2d 3e 77 68 65 72 65 | theEven|t->where|
|00002510| 2c 20 26 64 72 61 67 42 | 6f 75 6e 64 73 29 3b 0d |, &dragB|ounds);.|
|00002520| 09 09 09 09 62 72 65 61 | 6b 3b 0d 0d 09 09 09 09 |....brea|k;......|
|00002530| 63 61 73 65 20 69 6e 43 | 6f 6e 74 65 6e 74 3a 0d |case inC|ontent:.|
|00002540| 09 09 09 09 09 2f 2f 20 | 4e 6f 20 6e 65 65 64 20 |.....// |No need |
|00002550| 74 6f 20 68 61 6e 64 6c | 65 20 74 68 69 73 2c 20 |to handl|e this, |
|00002560| 73 69 6e 63 65 20 44 69 | 61 6c 6f 67 53 65 6c 65 |since Di|alogSele|
|00002570| 63 74 20 68 61 73 0d 09 | 09 09 09 09 2f 2f 20 61 |ct has..|....// a|
|00002580| 6c 72 65 61 64 79 20 74 | 61 6b 65 6e 20 63 61 72 |lready t|aken car|
|00002590| 65 20 6f 66 20 69 74 20 | 66 6f 72 20 75 73 2e 0d |e of it |for us..|
|000025a0| 09 09 09 09 62 72 65 61 | 6b 3b 0d 0d 09 09 09 09 |....brea|k;......|
|000025b0| 63 61 73 65 20 69 6e 47 | 72 6f 77 3a 0d 09 09 09 |case inG|row:....|
|000025c0| 09 09 2f 2f 20 57 65 20 | 63 61 6e 27 74 20 67 72 |..// We |can't gr|
|000025d0| 6f 77 2c 20 73 6f 20 69 | 67 6e 6f 72 65 20 74 68 |ow, so i|gnore th|
|000025e0| 69 73 20 6d 65 73 73 61 | 67 65 2e 2e 2e 0d 09 09 |is messa|ge......|
|000025f0| 09 09 62 72 65 61 6b 3b | 0d 09 09 09 7d 20 2f 2f |..break;|....} //|
|00002600| 20 45 4e 44 20 73 77 69 | 74 63 68 0d 09 09 62 72 | END swi|tch...br|
|00002610| 65 61 6b 3b 0d 09 09 0d | 09 09 63 61 73 65 20 6b |eak;....|..case k|
|00002620| 65 79 44 6f 77 6e 3a 0d | 09 09 63 61 73 65 20 61 |eyDown:.|..case a|
|00002630| 75 74 6f 4b 65 79 3a 0d | 09 09 09 63 68 61 72 20 |utoKey:.|...char |
|00002640| 74 68 65 4b 65 79 20 3d | 20 74 68 65 45 76 65 6e |theKey =| theEven|
|00002650| 74 2d 3e 6d 65 73 73 61 | 67 65 20 26 20 63 68 61 |t->messa|ge & cha|
|00002660| 72 43 6f 64 65 4d 61 73 | 6b 3b 0d 09 09 09 69 66 |rCodeMas|k;....if|
|00002670| 20 28 74 68 65 45 76 65 | 6e 74 2d 3e 6d 6f 64 69 | (theEve|nt->modi|
|00002680| 66 69 65 72 73 20 26 20 | 63 6d 64 4b 65 79 20 21 |fiers & |cmdKey !|
|00002690| 3d 20 30 29 0d 09 09 09 | 09 48 61 6e 64 6c 65 4d |= 0)....|.HandleM|
|000026a0| 65 6e 75 28 4d 65 6e 75 | 4b 65 79 28 74 68 65 4b |enu(Menu|Key(theK|
|000026b0| 65 79 29 29 3b 0d 09 09 | 62 72 65 61 6b 3b 0d 09 |ey));...|break;..|
|000026c0| 09 0d 09 09 63 61 73 65 | 20 61 63 74 69 76 61 74 |....case| activat|
|000026d0| 65 45 76 74 3a 0d 09 09 | 09 42 6f 6f 6c 65 61 6e |eEvt:...|.Boolean|
|000026e0| 20 61 63 74 69 76 61 74 | 65 3b 0d 0d 09 09 09 74 | activat|e;.....t|
|000026f0| 68 65 57 69 6e 64 6f 77 | 20 3d 20 57 69 6e 64 6f |heWindow| = Windo|
|00002700| 77 50 74 72 28 74 68 65 | 45 76 65 6e 74 2d 3e 6d |wPtr(the|Event->m|
|00002710| 65 73 73 61 67 65 29 3b | 0d 09 09 09 61 63 74 69 |essage);|....acti|
|00002720| 76 61 74 65 20 3d 20 28 | 74 68 65 45 76 65 6e 74 |vate = (|theEvent|
|00002730| 2d 3e 6d 6f 64 69 66 69 | 65 72 73 20 26 20 61 63 |->modifi|ers & ac|
|00002740| 74 69 76 65 46 6c 61 67 | 29 20 21 3d 20 30 3b 0d |tiveFlag|) != 0;.|
|00002750| 09 09 09 48 61 6e 64 6c | 65 41 63 74 69 76 61 74 |...Handl|eActivat|
|00002760| 65 28 74 68 65 57 69 6e | 64 6f 77 2c 20 61 63 74 |e(theWin|dow, act|
|00002770| 69 76 61 74 65 2c 20 74 | 68 65 45 76 65 6e 74 29 |ivate, t|heEvent)|
|00002780| 3b 0d 09 09 62 72 65 61 | 6b 3b 0d 09 09 0d 09 09 |;...brea|k;......|
|00002790| 63 61 73 65 20 75 70 64 | 61 74 65 45 76 74 3a 0d |case upd|ateEvt:.|
|000027a0| 09 09 09 74 68 65 57 69 | 6e 64 6f 77 20 3d 20 28 |...theWi|ndow = (|
|000027b0| 57 69 6e 64 6f 77 50 74 | 72 29 74 68 65 45 76 65 |WindowPt|r)theEve|
|000027c0| 6e 74 2d 3e 6d 65 73 73 | 61 67 65 3b 0d 09 09 09 |nt->mess|age;....|
|000027d0| 69 66 20 28 74 68 65 57 | 69 6e 64 6f 77 20 3d 3d |if (theW|indow ==|
|000027e0| 20 67 53 65 71 75 65 6e | 63 65 72 44 6c 6f 67 29 | gSequen|cerDlog)|
|000027f0| 0d 09 09 09 09 48 61 6e | 64 6c 65 55 70 64 61 74 |.....Han|dleUpdat|
|00002800| 65 28 74 68 65 57 69 6e | 64 6f 77 29 3b 0d 09 09 |e(theWin|dow);...|
|00002810| 09 65 6c 73 65 20 7b 0d | 09 09 09 09 42 65 67 69 |.else {.|....Begi|
|00002820| 6e 55 70 64 61 74 65 28 | 74 68 65 57 69 6e 64 6f |nUpdate(|theWindo|
|00002830| 77 29 3b 0d 09 09 09 09 | 48 61 6e 64 6c 65 55 70 |w);.....|HandleUp|
|00002840| 64 61 74 65 28 74 68 65 | 57 69 6e 64 6f 77 29 3b |date(the|Window);|
|00002850| 0d 09 09 09 09 45 6e 64 | 55 70 64 61 74 65 28 74 |.....End|Update(t|
|00002860| 68 65 57 69 6e 64 6f 77 | 29 3b 0d 09 09 09 7d 0d |heWindow|);....}.|
|00002870| 09 09 62 72 65 61 6b 3b | 0d 09 09 0d 09 09 63 61 |..break;|......ca|
|00002880| 73 65 20 6f 73 45 76 74 | 3a 0d 09 09 09 48 61 6e |se osEvt|:....Han|
|00002890| 64 6c 65 4f 53 45 76 65 | 6e 74 28 74 68 65 45 76 |dleOSEve|nt(theEv|
|000028a0| 65 6e 74 29 3b 0d 09 09 | 62 72 65 61 6b 3b 0d 09 |ent);...|break;..|
|000028b0| 09 0d 09 09 63 61 73 65 | 20 6b 48 69 67 68 4c 65 |....case| kHighLe|
|000028c0| 76 65 6c 45 76 65 6e 74 | 3a 0d 09 09 09 4f 53 45 |velEvent|:....OSE|
|000028d0| 72 72 20 65 72 72 3b 0d | 09 09 09 65 72 72 20 3d |rr err;.|...err =|
|000028e0| 20 41 45 50 72 6f 63 65 | 73 73 41 70 70 6c 65 45 | AEProce|ssAppleE|
|000028f0| 76 65 6e 74 28 74 68 65 | 45 76 65 6e 74 29 3b 0d |vent(the|Event);.|
|00002900| 09 09 62 72 65 61 6b 3b | 0d 09 7d 20 2f 2f 20 45 |..break;|..} // E|
|00002910| 4e 44 20 73 77 69 74 63 | 68 0d 7d 20 2f 2f 20 45 |ND switc|h.} // E|
|00002920| 4e 44 20 48 61 6e 64 6c | 65 45 76 65 6e 74 0d 0d |ND Handl|eEvent..|
|00002930| 2f 2f 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |// -----|--------|
|00002940| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002950| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002960| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002970| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 0d |--------|------..|
|00002980| 76 6f 69 64 20 48 61 6e | 64 6c 65 4d 65 6e 75 28 |void Han|dleMenu(|
|00002990| 6c 6f 6e 67 20 6d 65 6e | 75 43 6f 64 65 29 20 7b |long men|uCode) {|
|000029a0| 0d 09 73 68 6f 72 74 20 | 6d 65 6e 75 49 44 2c 20 |..short |menuID, |
|000029b0| 6d 65 6e 75 49 74 65 6d | 3b 0d 09 0d 09 6d 65 6e |menuItem|;....men|
|000029c0| 75 49 44 20 3d 20 48 69 | 57 6f 72 64 28 6d 65 6e |uID = Hi|Word(men|
|000029d0| 75 43 6f 64 65 29 3b 0d | 09 6d 65 6e 75 49 74 65 |uCode);.|.menuIte|
|000029e0| 6d 20 3d 20 4c 6f 57 6f | 72 64 28 6d 65 6e 75 43 |m = LoWo|rd(menuC|
|000029f0| 6f 64 65 29 3b 0d 09 0d | 09 73 77 69 74 63 68 28 |ode);...|.switch(|
|00002a00| 6d 65 6e 75 49 44 29 20 | 7b 0d 09 09 63 61 73 65 |menuID) |{...case|
|00002a10| 20 6b 41 70 70 6c 65 4d | 65 6e 75 49 44 3a 0d 09 | kAppleM|enuID:..|
|00002a20| 09 09 73 77 69 74 63 68 | 28 6d 65 6e 75 49 74 65 |..switch|(menuIte|
|00002a30| 6d 29 20 7b 0d 09 09 09 | 09 63 61 73 65 20 6b 41 |m) {....|.case kA|
|00002a40| 70 70 6c 65 4d 65 6e 75 | 5f 41 62 6f 75 74 49 74 |ppleMenu|_AboutIt|
|00002a50| 65 6d 3a 0d 09 09 09 09 | 09 44 6f 41 62 6f 75 74 |em:.....|.DoAbout|
|00002a60| 53 65 71 75 65 6e 63 65 | 72 28 29 3b 0d 09 09 09 |Sequence|r();....|
|00002a70| 09 62 72 65 61 6b 3b 0d | 0d 09 09 09 09 64 65 66 |.break;.|.....def|
|00002a80| 61 75 6c 74 3a 0d 09 09 | 09 09 09 53 74 72 32 35 |ault:...|...Str25|
|00002a90| 35 20 64 65 73 6b 4e 61 | 6d 65 3b 0d 09 09 09 09 |5 deskNa|me;.....|
|00002aa0| 09 47 72 61 66 50 74 72 | 20 73 61 76 65 50 6f 72 |.GrafPtr| savePor|
|00002ab0| 74 3b 0d 09 09 09 09 09 | 47 65 74 50 6f 72 74 28 |t;......|GetPort(|
|00002ac0| 26 73 61 76 65 50 6f 72 | 74 29 3b 0d 09 09 09 09 |&savePor|t);.....|
|00002ad0| 09 47 65 74 49 74 65 6d | 28 67 41 70 70 6c 65 4d |.GetItem|(gAppleM|
|00002ae0| 65 6e 75 2c 20 6d 65 6e | 75 49 74 65 6d 2c 20 64 |enu, men|uItem, d|
|00002af0| 65 73 6b 4e 61 6d 65 29 | 3b 0d 09 09 09 09 09 28 |eskName)|;......(|
|00002b00| 76 6f 69 64 29 4f 70 65 | 6e 44 65 73 6b 41 63 63 |void)Ope|nDeskAcc|
|00002b10| 28 64 65 73 6b 4e 61 6d | 65 29 3b 0d 09 09 09 09 |(deskNam|e);.....|
|00002b20| 09 53 65 74 50 6f 72 74 | 28 73 61 76 65 50 6f 72 |.SetPort|(savePor|
|00002b30| 74 29 3b 0d 09 09 09 09 | 62 72 65 61 6b 3b 0d 09 |t);.....|break;..|
|00002b40| 09 09 7d 20 2f 2f 20 45 | 4e 44 20 73 77 69 74 63 |..} // E|ND switc|
|00002b50| 68 0d 09 09 62 72 65 61 | 6b 3b 0d 09 09 0d 09 09 |h...brea|k;......|
|00002b60| 63 61 73 65 20 6b 46 69 | 6c 65 4d 65 6e 75 49 44 |case kFi|leMenuID|
|00002b70| 3a 0d 09 09 09 73 77 69 | 74 63 68 28 6d 65 6e 75 |:....swi|tch(menu|
|00002b80| 49 74 65 6d 29 20 7b 0d | 09 09 09 09 63 61 73 65 |Item) {.|....case|
|00002b90| 20 6b 46 69 6c 65 4d 65 | 6e 75 5f 4f 70 65 6e 49 | kFileMe|nu_OpenI|
|00002ba0| 74 65 6d 3a 0d 09 09 09 | 09 09 50 75 73 68 42 75 |tem:....|..PushBu|
|00002bb0| 74 74 6f 6e 28 67 53 65 | 71 75 65 6e 63 65 72 44 |tton(gSe|quencerD|
|00002bc0| 6c 6f 67 2c 20 6b 53 65 | 71 44 6c 6f 67 5f 4f 70 |log, kSe|qDlog_Op|
|00002bd0| 65 6e 49 74 65 6d 29 3b | 0d 09 09 09 09 09 47 65 |enItem);|......Ge|
|00002be0| 74 4f 70 65 6e 46 69 6c | 65 28 29 3b 0d 09 09 09 |tOpenFil|e();....|
|00002bf0| 09 62 72 65 61 6b 3b 0d | 0d 09 09 09 09 63 61 73 |.break;.|.....cas|
|00002c00| 65 20 6b 46 69 6c 65 4d | 65 6e 75 5f 43 6c 6f 73 |e kFileM|enu_Clos|
|00002c10| 65 49 74 65 6d 3a 0d 09 | 09 09 09 09 50 75 73 68 |eItem:..|....Push|
|00002c20| 42 75 74 74 6f 6e 28 67 | 53 65 71 75 65 6e 63 65 |Button(g|Sequence|
|00002c30| 72 44 6c 6f 67 2c 20 6b | 53 65 71 44 6c 6f 67 5f |rDlog, k|SeqDlog_|
|00002c40| 43 6c 6f 73 65 49 74 65 | 6d 29 3b 0d 09 09 09 09 |CloseIte|m);.....|
|00002c50| 09 43 6c 6f 73 65 46 69 | 6c 65 28 29 3b 0d 09 09 |.CloseFi|le();...|
|00002c60| 09 09 62 72 65 61 6b 3b | 0d 0d 09 09 09 09 63 61 |..break;|......ca|
|00002c70| 73 65 20 6b 46 69 6c 65 | 4d 65 6e 75 5f 51 75 69 |se kFile|Menu_Qui|
|00002c80| 74 49 74 65 6d 3a 0d 09 | 09 09 09 09 50 75 73 68 |tItem:..|....Push|
|00002c90| 42 75 74 74 6f 6e 28 67 | 53 65 71 75 65 6e 63 65 |Button(g|Sequence|
|00002ca0| 72 44 6c 6f 67 2c 20 6b | 53 65 71 44 6c 6f 67 5f |rDlog, k|SeqDlog_|
|00002cb0| 51 75 69 74 49 74 65 6d | 29 3b 0d 09 09 09 09 09 |QuitItem|);......|
|00002cc0| 51 75 69 74 41 6e 64 43 | 6c 65 61 6e 75 70 28 29 |QuitAndC|leanup()|
|00002cd0| 3b 0d 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |;.....br|eak;....|
|00002ce0| 7d 20 2f 2f 20 45 4e 44 | 20 73 77 69 74 63 68 0d |} // END| switch.|
|00002cf0| 09 09 62 72 65 61 6b 3b | 0d 09 7d 20 2f 2f 20 45 |..break;|..} // E|
|00002d00| 4e 44 20 73 77 69 74 63 | 68 0d 09 0d 09 69 66 20 |ND switc|h....if |
|00002d10| 28 6d 65 6e 75 49 44 20 | 21 3d 20 30 29 0d 09 09 |(menuID |!= 0)...|
|00002d20| 48 69 6c 69 74 65 4d 65 | 6e 75 28 30 29 3b 0d 7d |HiliteMe|nu(0);.}|
|00002d30| 20 2f 2f 20 45 4e 44 20 | 48 61 6e 64 6c 65 4d 65 | // END |HandleMe|
|00002d40| 6e 75 0d 0d 2f 2f 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |nu..// -|--------|
|00002d50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002d60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002d70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002d80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002d90| 2d 2d 0d 0d 76 6f 69 64 | 20 48 61 6e 64 6c 65 55 |--..void| HandleU|
|00002da0| 70 64 61 74 65 28 57 69 | 6e 64 6f 77 50 74 72 20 |pdate(Wi|ndowPtr |
|00002db0| 74 68 65 57 69 6e 64 6f | 77 29 20 7b 0d 09 52 65 |theWindo|w) {..Re|
|00002dc0| 63 74 20 72 65 63 74 3b | 0d 09 47 72 61 66 50 74 |ct rect;|..GrafPt|
|00002dd0| 72 20 73 61 76 65 50 6f | 72 74 3b 0d 0d 09 47 65 |r savePo|rt;...Ge|
|00002de0| 74 50 6f 72 74 28 26 73 | 61 76 65 50 6f 72 74 29 |tPort(&s|avePort)|
|00002df0| 3b 0d 0d 09 69 66 20 28 | 74 68 65 57 69 6e 64 6f |;...if (|theWindo|
|00002e00| 77 20 3d 3d 20 67 53 65 | 71 75 65 6e 63 65 72 44 |w == gSe|quencerD|
|00002e10| 6c 6f 67 29 20 7b 0d 09 | 09 53 65 74 50 6f 72 74 |log) {..|.SetPort|
|00002e20| 28 67 53 65 71 75 65 6e | 63 65 72 44 6c 6f 67 29 |(gSequen|cerDlog)|
|00002e30| 3b 0d 09 09 46 72 61 6d | 65 42 6f 72 64 65 72 44 |;...Fram|eBorderD|
|00002e40| 6f 74 74 65 64 28 67 53 | 65 71 75 65 6e 63 65 72 |otted(gS|equencer|
|00002e50| 44 6c 6f 67 2c 20 6b 53 | 65 71 44 6c 6f 67 5f 4c |Dlog, kS|eqDlog_L|
|00002e60| 69 6e 65 31 49 74 65 6d | 29 3b 0d 0d 09 09 4c 55 |ine1Item|);....LU|
|00002e70| 70 64 61 74 65 28 67 53 | 65 71 75 65 6e 63 65 72 |pdate(gS|equencer|
|00002e80| 44 6c 6f 67 2d 3e 76 69 | 73 52 67 6e 2c 20 67 53 |Dlog->vi|sRgn, gS|
|00002e90| 6f 75 6e 64 73 4c 69 73 | 74 29 3b 0d 09 09 4c 55 |oundsLis|t);...LU|
|00002ea0| 70 64 61 74 65 28 67 53 | 65 71 75 65 6e 63 65 72 |pdate(gS|equencer|
|00002eb0| 44 6c 6f 67 2d 3e 76 69 | 73 52 67 6e 2c 20 67 53 |Dlog->vi|sRgn, gS|
|00002ec0| 65 71 75 65 6e 63 65 72 | 4c 69 73 74 29 3b 0d 0d |equencer|List);..|
|00002ed0| 09 09 46 6f 72 65 43 6f | 6c 6f 72 28 62 6c 61 63 |..ForeCo|lor(blac|
|00002ee0| 6b 43 6f 6c 6f 72 29 3b | 0d 09 09 47 65 74 44 49 |kColor);|...GetDI|
|00002ef0| 74 65 6d 52 65 63 74 28 | 67 53 65 71 75 65 6e 63 |temRect(|gSequenc|
|00002f00| 65 72 44 6c 6f 67 2c 20 | 6b 53 65 71 44 6c 6f 67 |erDlog, |kSeqDlog|
|00002f10| 5f 53 72 63 4c 69 73 74 | 49 74 65 6d 2c 20 26 72 |_SrcList|Item, &r|
|00002f20| 65 63 74 29 3b 0d 09 09 | 46 72 61 6d 65 52 65 63 |ect);...|FrameRec|
|00002f30| 74 28 26 72 65 63 74 29 | 3b 0d 09 09 47 65 74 44 |t(&rect)|;...GetD|
|00002f40| 49 74 65 6d 52 65 63 74 | 28 67 53 65 71 75 65 6e |ItemRect|(gSequen|
|00002f50| 63 65 72 44 6c 6f 67 2c | 20 6b 53 65 71 44 6c 6f |cerDlog,| kSeqDlo|
|00002f60| 67 5f 53 65 71 4c 69 73 | 74 49 74 65 6d 2c 20 26 |g_SeqLis|tItem, &|
|00002f70| 72 65 63 74 29 3b 0d 09 | 09 46 72 61 6d 65 52 65 |rect);..|.FrameRe|
|00002f80| 63 74 28 26 72 65 63 74 | 29 3b 0d 0d 09 09 2f 2f |ct(&rect|);....//|
|00002f90| 20 44 72 61 77 20 76 6f | 6c 75 6d 65 20 70 6f 70 | Draw vo|lume pop|
|00002fa0| 75 70 20 6d 65 6e 75 0d | 09 09 47 65 74 44 49 74 |up menu.|..GetDIt|
|00002fb0| 65 6d 52 65 63 74 28 67 | 53 65 71 75 65 6e 63 65 |emRect(g|Sequence|
|00002fc0| 72 44 6c 6f 67 2c 20 6b | 53 65 71 44 6c 6f 67 5f |rDlog, k|SeqDlog_|
|00002fd0| 56 6f 6c 50 69 63 49 74 | 65 6d 2c 20 26 72 65 63 |VolPicIt|em, &rec|
|00002fe0| 74 29 3b 0d 09 09 4f 66 | 66 73 65 74 52 65 63 74 |t);...Of|fsetRect|
|00002ff0| 28 26 72 65 63 74 2c 20 | 31 2c 20 31 29 3b 0d 09 |(&rect, |1, 1);..|
|00003000| 09 46 69 6c 6c 52 65 63 | 74 28 26 72 65 63 74 2c |.FillRec|t(&rect,|
|00003010| 20 28 43 6f 6e 73 74 50 | 61 74 74 65 72 6e 50 61 | (ConstP|atternPa|
|00003020| 72 61 6d 29 26 71 64 2e | 62 6c 61 63 6b 29 3b 0d |ram)&qd.|black);.|
|00003030| 09 09 4f 66 66 73 65 74 | 52 65 63 74 28 26 72 65 |..Offset|Rect(&re|
|00003040| 63 74 2c 20 2d 31 2c 20 | 2d 31 29 3b 0d 09 09 46 |ct, -1, |-1);...F|
|00003050| 6f 72 65 43 6f 6c 6f 72 | 28 77 68 69 74 65 43 6f |oreColor|(whiteCo|
|00003060| 6c 6f 72 29 3b 0d 09 09 | 46 69 6c 6c 52 65 63 74 |lor);...|FillRect|
|00003070| 28 26 72 65 63 74 2c 20 | 28 43 6f 6e 73 74 50 61 |(&rect, |(ConstPa|
|00003080| 74 74 65 72 6e 50 61 72 | 61 6d 29 26 71 64 2e 77 |tternPar|am)&qd.w|
|00003090| 68 69 74 65 29 3b 0d 09 | 09 46 6f 72 65 43 6f 6c |hite);..|.ForeCol|
|000030a0| 6f 72 28 62 6c 61 63 6b | 43 6f 6c 6f 72 29 3b 0d |or(black|Color);.|
|000030b0| 09 09 46 72 61 6d 65 52 | 65 63 74 28 26 72 65 63 |..FrameR|ect(&rec|
|000030c0| 74 29 3b 0d 0d 09 09 55 | 70 64 61 74 65 4c 69 73 |t);....U|pdateLis|
|000030d0| 74 53 65 6c 65 63 74 65 | 64 28 29 3b 0d 09 09 55 |tSelecte|d();...U|
|000030e0| 70 64 61 74 65 4d 65 73 | 73 61 67 65 28 29 3b 0d |pdateMes|sage();.|
|000030f0| 09 7d 0d 0d 09 53 65 74 | 50 6f 72 74 28 73 61 76 |.}...Set|Port(sav|
|00003100| 65 50 6f 72 74 29 3b 0d | 7d 20 2f 2f 20 45 4e 44 |ePort);.|} // END|
|00003110| 20 48 61 6e 64 6c 65 55 | 70 64 61 74 65 0d 0d 2f | HandleU|pdate../|
|00003120| 2f 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/ ------|--------|
|00003130| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003140| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003150| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 0d 76 |--------|-----..v|
|00003170| 6f 69 64 20 48 61 6e 64 | 6c 65 41 63 74 69 76 61 |oid Hand|leActiva|
|00003180| 74 65 28 57 69 6e 64 6f | 77 50 74 72 20 74 68 65 |te(Windo|wPtr the|
|00003190| 57 69 6e 64 6f 77 2c 20 | 42 6f 6f 6c 65 61 6e 20 |Window, |Boolean |
|000031a0| 61 63 74 69 76 61 74 65 | 2c 20 45 76 65 6e 74 52 |activate|, EventR|
|000031b0| 65 63 6f 72 64 20 2a 74 | 68 65 45 76 65 6e 74 29 |ecord *t|heEvent)|
|000031c0| 20 7b 0d 09 53 65 74 50 | 6f 72 74 28 74 68 65 57 | {..SetP|ort(theW|
|000031d0| 69 6e 64 6f 77 29 3b 0d | 09 69 66 20 28 74 68 65 |indow);.|.if (the|
|000031e0| 57 69 6e 64 6f 77 20 3d | 3d 20 67 53 65 71 75 65 |Window =|= gSeque|
|000031f0| 6e 63 65 72 44 6c 6f 67 | 29 20 7b 0d 09 09 41 63 |ncerDlog|) {...Ac|
|00003200| 74 69 76 61 74 65 53 65 | 71 75 65 6e 63 65 72 28 |tivateSe|quencer(|
|00003210| 61 63 74 69 76 61 74 65 | 2c 20 74 72 75 65 29 3b |activate|, true);|
|00003220| 0d 0d 09 09 4c 41 63 74 | 69 76 61 74 65 28 61 63 |....LAct|ivate(ac|
|00003230| 74 69 76 61 74 65 2c 20 | 67 53 6f 75 6e 64 73 4c |tivate, |gSoundsL|
|00003240| 69 73 74 29 3b 0d 09 09 | 4c 41 63 74 69 76 61 74 |ist);...|LActivat|
|00003250| 65 28 61 63 74 69 76 61 | 74 65 2c 20 67 53 65 71 |e(activa|te, gSeq|
|00003260| 75 65 6e 63 65 72 4c 69 | 73 74 29 3b 0d 0d 09 09 |uencerLi|st);....|
|00003270| 69 66 20 28 21 61 63 74 | 69 76 61 74 65 29 20 7b |if (!act|ivate) {|
|00003280| 0d 09 09 09 44 72 61 77 | 44 65 66 61 75 6c 74 4c |....Draw|DefaultL|
|00003290| 69 73 74 42 6f 72 64 65 | 72 28 67 53 65 71 75 65 |istBorde|r(gSeque|
|000032a0| 6e 63 65 72 44 6c 6f 67 | 2c 20 6b 53 65 71 44 6c |ncerDlog|, kSeqDl|
|000032b0| 6f 67 5f 53 72 63 4c 69 | 73 74 49 74 65 6d 2c 20 |og_SrcLi|stItem, |
|000032c0| 66 61 6c 73 65 29 3b 0d | 09 09 09 44 72 61 77 44 |false);.|...DrawD|
|000032d0| 65 66 61 75 6c 74 4c 69 | 73 74 42 6f 72 64 65 72 |efaultLi|stBorder|
|000032e0| 28 67 53 65 71 75 65 6e | 63 65 72 44 6c 6f 67 2c |(gSequen|cerDlog,|
|000032f0| 20 6b 53 65 71 44 6c 6f | 67 5f 53 65 71 4c 69 73 | kSeqDlo|g_SeqLis|
|00003300| 74 49 74 65 6d 2c 20 66 | 61 6c 73 65 29 3b 0d 09 |tItem, f|alse);..|
|00003310| 09 7d 0d 09 09 65 6c 73 | 65 0d 09 09 09 55 70 64 |.}...els|e....Upd|
|00003320| 61 74 65 4c 69 73 74 53 | 65 6c 65 63 74 65 64 28 |ateListS|elected(|
|00003330| 29 3b 0d 09 7d 0d 7d 20 | 2f 2f 20 45 4e 44 20 48 |);..}.} |// END H|
|00003340| 61 6e 64 6c 65 41 63 74 | 69 76 61 74 65 0d 0d 76 |andleAct|ivate..v|
|00003350| 6f 69 64 20 41 63 74 69 | 76 61 74 65 53 65 71 75 |oid Acti|vateSequ|
|00003360| 65 6e 63 65 72 28 42 6f | 6f 6c 65 61 6e 20 61 63 |encer(Bo|olean ac|
|00003370| 74 69 76 61 74 65 2c 20 | 42 6f 6f 6c 65 61 6e 20 |tivate, |Boolean |
|00003380| 66 75 6c 6c 29 20 7b 0d | 09 43 65 6c 6c 20 63 65 |full) {.|.Cell ce|
|00003390| 6c 6c 3b 0d 09 73 68 6f | 72 74 20 68 69 6c 69 74 |ll;..sho|rt hilit|
|000033a0| 65 2c 20 69 3b 0d 09 0d | 09 69 66 20 28 61 63 74 |e, i;...|.if (act|
|000033b0| 69 76 61 74 65 29 20 7b | 0d 09 09 68 69 6c 69 74 |ivate) {|...hilit|
|000033c0| 65 20 3d 20 30 3b 0d 09 | 7d 0d 09 65 6c 73 65 0d |e = 0;..|}..else.|
|000033d0| 09 09 68 69 6c 69 74 65 | 20 3d 20 32 35 35 3b 0d |..hilite| = 255;.|
|000033e0| 0d 09 66 6f 72 20 28 69 | 20 3d 20 6b 53 65 71 44 |..for (i| = kSeqD|
|000033f0| 6c 6f 67 5f 4f 70 65 6e | 49 74 65 6d 3b 20 69 20 |log_Open|Item; i |
|00003400| 3c 3d 20 6b 53 65 71 44 | 6c 6f 67 5f 49 6e 66 6f |<= kSeqD|log_Info|
|00003410| 49 74 65 6d 3b 20 69 2b | 2b 29 0d 09 09 48 69 6c |Item; i+|+)...Hil|
|00003420| 69 74 65 43 6f 6e 74 72 | 6f 6c 28 47 65 74 43 74 |iteContr|ol(GetCt|
|00003430| 6c 48 64 6c 28 67 53 65 | 71 75 65 6e 63 65 72 44 |lHdl(gSe|quencerD|
|00003440| 6c 6f 67 2c 20 69 29 2c | 20 68 69 6c 69 74 65 29 |log, i),| hilite)|
|00003450| 3b 0d 09 69 66 20 28 61 | 63 74 69 76 61 74 65 20 |;..if (a|ctivate |
|00003460| 26 26 20 21 67 46 69 6c | 65 4f 70 65 6e 29 20 7b |&& !gFil|eOpen) {|
|00003470| 0d 09 09 48 69 6c 69 74 | 65 43 6f 6e 74 72 6f 6c |...Hilit|eControl|
|00003480| 28 47 65 74 43 74 6c 48 | 64 6c 28 67 53 65 71 75 |(GetCtlH|dl(gSequ|
|00003490| 65 6e 63 65 72 44 6c 6f | 67 2c 20 6b 53 65 71 44 |encerDlo|g, kSeqD|
|000034a0| 6c 6f 67 5f 43 6c 6f 73 | 65 49 74 65 6d 29 2c 20 |log_Clos|eItem), |
|000034b0| 32 35 35 29 3b 0d 09 09 | 44 69 73 61 62 6c 65 49 |255);...|DisableI|
|000034c0| 74 65 6d 28 67 46 69 6c | 65 4d 65 6e 75 2c 20 6b |tem(gFil|eMenu, k|
|000034d0| 46 69 6c 65 4d 65 6e 75 | 5f 43 6c 6f 73 65 49 74 |FileMenu|_CloseIt|
|000034e0| 65 6d 29 3b 0d 09 7d 0d | 09 65 6c 73 65 20 69 66 |em);..}.|.else if|
|000034f0| 20 28 61 63 74 69 76 61 | 74 65 20 26 26 20 67 46 | (activa|te && gF|
|00003500| 69 6c 65 4f 70 65 6e 29 | 20 7b 0d 09 09 45 6e 61 |ileOpen)| {...Ena|
|00003510| 62 6c 65 49 74 65 6d 28 | 67 46 69 6c 65 4d 65 6e |bleItem(|gFileMen|
|00003520| 75 2c 20 6b 46 69 6c 65 | 4d 65 6e 75 5f 43 6c 6f |u, kFile|Menu_Clo|
|00003530| 73 65 49 74 65 6d 29 3b | 0d 09 7d 0d 09 0d 09 63 |seItem);|..}....c|
|00003540| 65 6c 6c 2e 76 20 3d 20 | 63 65 6c 6c 2e 68 20 3d |ell.v = |cell.h =|
|00003550| 20 30 3b 0d 09 69 66 20 | 28 61 63 74 69 76 61 74 | 0;..if |(activat|
|00003560| 65 20 26 26 20 28 28 2a | 2a 67 53 6f 75 6e 64 73 |e && ((*|*gSounds|
|00003570| 4c 69 73 74 29 2e 64 61 | 74 61 42 6f 75 6e 64 73 |List).da|taBounds|
|00003580| 2e 62 6f 74 74 6f 6d 20 | 3c 3d 20 30 20 7c 7c 0d |.bottom |<= 0 ||.|
|00003590| 09 09 21 4c 47 65 74 53 | 65 6c 65 63 74 28 74 72 |..!LGetS|elect(tr|
|000035a0| 75 65 2c 20 26 63 65 6c | 6c 2c 20 67 53 6f 75 6e |ue, &cel|l, gSoun|
|000035b0| 64 73 4c 69 73 74 29 29 | 29 0d 09 09 68 69 6c 69 |dsList))|)...hili|
|000035c0| 74 65 20 3d 20 32 35 35 | 3b 0d 09 66 6f 72 20 28 |te = 255|;..for (|
|000035d0| 69 20 3d 20 6b 53 65 71 | 44 6c 6f 67 5f 50 6c 61 |i = kSeq|Dlog_Pla|
|000035e0| 79 53 72 63 49 74 65 6d | 3b 20 69 20 3c 3d 20 6b |ySrcItem|; i <= k|
|000035f0| 53 65 71 44 6c 6f 67 5f | 4c 6f 6f 70 53 72 63 49 |SeqDlog_|LoopSrcI|
|00003600| 74 65 6d 3b 20 69 2b 2b | 29 0d 09 09 48 69 6c 69 |tem; i++|)...Hili|
|00003610| 74 65 43 6f 6e 74 72 6f | 6c 28 47 65 74 43 74 6c |teContro|l(GetCtl|
|00003620| 48 64 6c 28 67 53 65 71 | 75 65 6e 63 65 72 44 6c |Hdl(gSeq|uencerDl|
|00003630| 6f 67 2c 20 69 29 2c 20 | 68 69 6c 69 74 65 29 3b |og, i), |hilite);|
|00003640| 0d 09 66 6f 72 20 28 69 | 20 3d 20 6b 53 65 71 44 |..for (i| = kSeqD|
|00003650| 6c 6f 67 5f 49 6e 73 65 | 72 74 49 74 65 6d 3b 20 |log_Inse|rtItem; |
|00003660| 69 20 3c 3d 20 6b 53 65 | 71 44 6c 6f 67 5f 41 70 |i <= kSe|qDlog_Ap|
|00003670| 70 65 6e 64 49 74 65 6d | 3b 20 69 2b 2b 29 0d 09 |pendItem|; i++)..|
|00003680| 09 48 69 6c 69 74 65 43 | 6f 6e 74 72 6f 6c 28 47 |.HiliteC|ontrol(G|
|00003690| 65 74 43 74 6c 48 64 6c | 28 67 53 65 71 75 65 6e |etCtlHdl|(gSequen|
|000036a0| 63 65 72 44 6c 6f 67 2c | 20 69 29 2c 20 68 69 6c |cerDlog,| i), hil|
|000036b0| 69 74 65 29 3b 0d 09 69 | 66 20 28 21 61 63 74 69 |ite);..i|f (!acti|
|000036c0| 76 61 74 65 20 7c 7c 20 | 28 61 63 74 69 76 61 74 |vate || |(activat|
|000036d0| 65 20 26 26 20 67 46 69 | 6c 65 4f 70 65 6e 20 26 |e && gFi|leOpen &|
|000036e0| 26 20 67 43 75 72 72 65 | 6e 74 46 69 6c 65 2e 66 |& gCurre|ntFile.f|
|000036f0| 69 6c 65 4c 6f 63 6b 65 | 64 29 0d 09 09 7c 7c 20 |ileLocke|d)...|| |
|00003700| 61 63 74 69 76 61 74 65 | 20 26 26 20 21 67 46 69 |activate| && !gFi|
|00003710| 6c 65 4f 70 65 6e 29 0d | 09 09 48 69 6c 69 74 65 |leOpen).|..Hilite|
|00003720| 43 6f 6e 74 72 6f 6c 28 | 47 65 74 43 74 6c 48 64 |Control(|GetCtlHd|
|00003730| 6c 28 67 53 65 71 75 65 | 6e 63 65 72 44 6c 6f 67 |l(gSeque|ncerDlog|
|00003740| 2c 20 6b 53 65 71 44 6c | 6f 67 5f 45 64 69 74 53 |, kSeqDl|og_EditS|
|00003750| 72 63 49 74 65 6d 29 2c | 20 32 35 35 29 3b 0d 09 |rcItem),| 255);..|
|00003760| 65 6c 73 65 0d 09 09 48 | 69 6c 69 74 65 43 6f 6e |else...H|iliteCon|
|00003770| 74 72 6f 6c 28 47 65 74 | 43 74 6c 48 64 6c 28 67 |trol(Get|CtlHdl(g|
|00003780| 53 65 71 75 65 6e 63 65 | 72 44 6c 6f 67 2c 20 6b |Sequence|rDlog, k|
|00003790| 53 65 71 44 6c 6f 67 5f | 45 64 69 74 53 72 63 49 |SeqDlog_|EditSrcI|
|000037a0| 74 65 6d 29 2c 20 30 29 | 3b 0d 0d 09 63 65 6c 6c |tem), 0)|;...cell|
|000037b0| 2e 76 20 3d 20 63 65 6c | 6c 2e 68 20 3d 20 30 3b |.v = cel|l.h = 0;|
|000037c0| 0d 09 69 66 20 28 61 63 | 74 69 76 61 74 65 20 26 |..if (ac|tivate &|
|000037d0| 26 20 28 28 2a 2a 67 53 | 65 71 75 65 6e 63 65 72 |& ((**gS|equencer|
|000037e0| 4c 69 73 74 29 2e 64 61 | 74 61 42 6f 75 6e 64 73 |List).da|taBounds|
|000037f0| 2e 62 6f 74 74 6f 6d 20 | 3c 3d 20 30 20 7c 7c 0d |.bottom |<= 0 ||.|
|00003800| 09 09 21 4c 47 65 74 53 | 65 6c 65 63 74 28 74 72 |..!LGetS|elect(tr|
|00003810| 75 65 2c 20 26 63 65 6c | 6c 2c 20 20 67 53 65 71 |ue, &cel|l,  gSeq|
|00003820| 75 65 6e 63 65 72 4c 69 | 73 74 29 29 29 0d 09 09 |uencerLi|st)))...|
|00003830| 68 69 6c 69 74 65 20 3d | 20 32 35 35 3b 09 2f 2f |hilite =| 255;.//|
|00003840| 20 44 69 73 61 62 6c 65 | 64 20 6e 6f 20 6d 61 74 | Disable|d no mat|
|00003850| 74 65 72 20 77 68 61 74 | 2c 20 73 69 6e 63 65 20 |ter what|, since |
|00003860| 6e 6f 20 69 74 65 6d 73 | 0d 09 09 09 09 09 09 2f |no items|......./|
|00003870| 2f 20 69 6e 20 6c 69 73 | 74 20 6f 72 20 6e 6f 74 |/ in lis|t or not|
|00003880| 68 69 6e 67 20 73 65 6c | 65 63 74 65 64 20 69 6e |hing sel|ected in|
|00003890| 20 6c 69 73 74 2e 0d 09 | 66 6f 72 20 28 69 20 3d | list...|for (i =|
|000038a0| 20 6b 53 65 71 44 6c 6f | 67 5f 50 6c 61 79 53 65 | kSeqDlo|g_PlaySe|
|000038b0| 71 49 74 65 6d 3b 20 69 | 20 3c 3d 20 6b 53 65 71 |qItem; i| <= kSeq|
|000038c0| 44 6c 6f 67 5f 50 6c 61 | 79 4c 6f 6f 70 53 65 71 |Dlog_Pla|yLoopSeq|
|000038d0| 49 74 65 6d 3b 20 69 2b | 2b 29 0d 09 09 48 69 6c |Item; i+|+)...Hil|
|000038e0| 69 74 65 43 6f 6e 74 72 | 6f 6c 28 47 65 74 43 74 |iteContr|ol(GetCt|
|000038f0| 6c 48 64 6c 28 67 53 65 | 71 75 65 6e 63 65 72 44 |lHdl(gSe|quencerD|
|00003900| 6c 6f 67 2c 20 69 29 2c | 20 68 69 6c 69 74 65 29 |log, i),| hilite)|
|00003910| 3b 0d 09 66 6f 72 20 28 | 69 20 3d 20 6b 53 65 71 |;..for (|i = kSeq|
|00003920| 44 6c 6f 67 5f 52 65 6d | 6f 76 65 49 74 65 6d 3b |Dlog_Rem|oveItem;|
|00003930| 20 69 20 3c 3d 20 6b 53 | 65 71 44 6c 6f 67 5f 52 | i <= kS|eqDlog_R|
|00003940| 65 6d 6f 76 65 41 6c 6c | 49 74 65 6d 3b 20 69 2b |emoveAll|Item; i+|
|00003950| 2b 29 0d 09 09 48 69 6c | 69 74 65 43 6f 6e 74 72 |+)...Hil|iteContr|
|00003960| 6f 6c 28 47 65 74 43 74 | 6c 48 64 6c 28 67 53 65 |ol(GetCt|lHdl(gSe|
|00003970| 71 75 65 6e 63 65 72 44 | 6c 6f 67 2c 20 69 29 2c |quencerD|log, i),|
|00003980| 20 68 69 6c 69 74 65 29 | 3b 0d 09 69 66 20 28 61 | hilite)|;..if (a|
|00003990| 63 74 69 76 61 74 65 29 | 0d 09 09 48 69 6c 69 74 |ctivate)|...Hilit|
|000039a0| 65 43 6f 6e 74 72 6f 6c | 28 47 65 74 43 74 6c 48 |eControl|(GetCtlH|
|000039b0| 64 6c 28 67 53 65 71 75 | 65 6e 63 65 72 44 6c 6f |dl(gSequ|encerDlo|
|000039c0| 67 2c 20 6b 53 65 71 44 | 6c 6f 67 5f 50 6c 61 79 |g, kSeqD|log_Play|
|000039d0| 4c 6f 6f 70 53 65 71 49 | 74 65 6d 29 2c 0d 09 09 |LoopSeqI|tem),...|
|000039e0| 09 28 2a 2a 67 53 65 71 | 75 65 6e 63 65 72 4c 69 |.(**gSeq|uencerLi|
|000039f0| 73 74 29 2e 64 61 74 61 | 42 6f 75 6e 64 73 2e 62 |st).data|Bounds.b|
|00003a00| 6f 74 74 6f 6d 20 3e 20 | 30 20 3f 20 30 20 3a 20 |ottom > |0 ? 0 : |
|00003a10| 32 35 35 29 3b 0d 7d 20 | 2f 2f 20 45 4e 44 20 41 |255);.} |// END A|
|00003a20| 63 74 69 76 61 74 65 53 | 65 71 75 65 6e 63 65 72 |ctivateS|equencer|
|00003a30| 0d 0d 2f 2f 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..// ---|--------|
|00003a40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a80| 0d 0d 76 6f 69 64 20 48 | 61 6e 64 6c 65 4f 53 45 |..void H|andleOSE|
|00003a90| 76 65 6e 74 28 45 76 65 | 6e 74 52 65 63 6f 72 64 |vent(Eve|ntRecord|
|00003aa0| 20 2a 74 68 65 45 76 74 | 29 20 7b 0d 09 57 69 6e | *theEvt|) {..Win|
|00003ab0| 64 6f 77 50 74 72 20 63 | 75 72 72 65 6e 74 46 72 |dowPtr c|urrentFr|
|00003ac0| 6f 6e 74 57 69 6e 64 6f | 77 3b 0d 09 6c 6f 6e 67 |ontWindo|w;..long|
|00003ad0| 20 72 65 73 75 6c 74 43 | 6f 64 65 20 3d 20 42 69 | resultC|ode = Bi|
|00003ae0| 74 73 52 6f 74 61 74 65 | 4c 65 66 74 28 74 68 65 |tsRotate|Left(the|
|00003af0| 45 76 74 2d 3e 6d 65 73 | 73 61 67 65 2c 20 38 29 |Evt->mes|sage, 8)|
|00003b00| 20 26 20 30 78 46 46 3b | 0d 0d 09 63 75 72 72 65 | & 0xFF;|...curre|
|00003b10| 6e 74 46 72 6f 6e 74 57 | 69 6e 64 6f 77 20 3d 20 |ntFrontW|indow = |
|00003b20| 46 72 6f 6e 74 57 69 6e | 64 6f 77 28 29 3b 0d 0d |FrontWin|dow();..|
|00003b30| 09 69 66 20 28 72 65 73 | 75 6c 74 43 6f 64 65 20 |.if (res|ultCode |
|00003b40| 3d 3d 20 6d 6f 75 73 65 | 4d 6f 76 65 64 4d 65 73 |== mouse|MovedMes|
|00003b50| 73 61 67 65 29 20 7b 0d | 09 09 2f 2f 20 4d 6f 75 |sage) {.|..// Mou|
|00003b60| 73 65 2d 6d 6f 76 65 64 | 20 73 61 6d 65 20 61 73 |se-moved| same as|
|00003b70| 20 69 64 6c 65 20 69 6e | 20 74 68 69 73 20 61 70 | idle in| this ap|
|00003b80| 70 2e 0d 09 09 2f 2f 20 | 49 6e 20 74 68 69 73 20 |p....// |In this |
|00003b90| 61 70 70 2c 20 64 6f 20 | 6e 6f 74 68 69 6e 67 2e |app, do |nothing.|
|00003ba0| 0d 09 7d 0d 09 65 6c 73 | 65 20 69 66 20 28 72 65 |..}..els|e if (re|
|00003bb0| 73 75 6c 74 43 6f 64 65 | 20 3d 3d 20 73 75 73 70 |sultCode| == susp|
|00003bc0| 65 6e 64 52 65 73 75 6d | 65 4d 65 73 73 61 67 65 |endResum|eMessage|
|00003bd0| 29 20 7b 0d 09 09 69 66 | 20 28 28 74 68 65 45 76 |) {...if| ((theEv|
|00003be0| 74 2d 3e 6d 65 73 73 61 | 67 65 20 26 20 72 65 73 |t->messa|ge & res|
|00003bf0| 75 6d 65 46 6c 61 67 29 | 20 21 3d 20 30 29 20 7b |umeFlag)| != 0) {|
|00003c00| 20 2f 2f 20 52 65 73 75 | 6d 65 20 65 76 65 6e 74 | // Resu|me event|
|00003c10| 0d 09 09 09 67 49 6e 42 | 61 63 6b 67 72 6f 75 6e |....gInB|ackgroun|
|00003c20| 64 20 3d 20 66 61 6c 73 | 65 3b 0d 09 09 09 48 61 |d = fals|e;....Ha|
|00003c30| 6e 64 6c 65 41 63 74 69 | 76 61 74 65 28 63 75 72 |ndleActi|vate(cur|
|00003c40| 72 65 6e 74 46 72 6f 6e | 74 57 69 6e 64 6f 77 2c |rentFron|tWindow,|
|00003c50| 20 21 67 49 6e 42 61 63 | 6b 67 72 6f 75 6e 64 2c | !gInBac|kground,|
|00003c60| 20 74 68 65 45 76 74 29 | 3b 0d 09 09 7d 0d 09 09 | theEvt)|;...}...|
|00003c70| 65 6c 73 65 20 7b 20 2f | 2f 20 53 75 73 70 65 6e |else { /|/ Suspen|
|00003c80| 64 20 65 76 65 6e 74 0d | 09 09 09 67 49 6e 42 61 |d event.|...gInBa|
|00003c90| 63 6b 67 72 6f 75 6e 64 | 20 3d 20 74 72 75 65 3b |ckground| = true;|
|00003ca0| 0d 09 09 09 48 61 6e 64 | 6c 65 41 63 74 69 76 61 |....Hand|leActiva|
|00003cb0| 74 65 28 63 75 72 72 65 | 6e 74 46 72 6f 6e 74 57 |te(curre|ntFrontW|
|00003cc0| 69 6e 64 6f 77 2c 20 21 | 67 49 6e 42 61 63 6b 67 |indow, !|gInBackg|
|00003cd0| 72 6f 75 6e 64 2c 20 74 | 68 65 45 76 74 29 3b 0d |round, t|heEvt);.|
|00003ce0| 09 09 7d 0d 09 7d 0d 7d | 20 2f 2f 20 45 4e 44 20 |..}..}.}| // END |
|00003cf0| 48 61 6e 64 6c 65 4f 53 | 45 76 65 6e 74 0d 0d 2f |HandleOS|Event../|
|00003d00| 2f 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/ ------|--------|
|00003d10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 0d 76 |--------|-----..v|
|00003d50| 6f 69 64 20 44 72 61 77 | 4d 65 73 73 61 67 65 28 |oid Draw|Message(|
|00003d60| 53 74 72 32 35 35 20 6d | 65 73 73 61 67 65 29 20 |Str255 m|essage) |
|00003d70| 7b 0d 09 69 66 20 28 6d | 65 73 73 61 67 65 20 3d |{..if (m|essage =|
|00003d80| 3d 20 6e 69 6c 29 0d 09 | 09 67 4d 65 73 73 61 67 |= nil)..|.gMessag|
|00003d90| 65 5b 30 5d 20 3d 20 30 | 3b 0d 09 65 6c 73 65 0d |e[0] = 0|;..else.|
|00003da0| 09 09 50 53 74 72 43 70 | 79 28 6d 65 73 73 61 67 |..PStrCp|y(messag|
|00003db0| 65 2c 20 67 4d 65 73 73 | 61 67 65 29 3b 0d 09 55 |e, gMess|age);..U|
|00003dc0| 70 64 61 74 65 4d 65 73 | 73 61 67 65 28 29 3b 0d |pdateMes|sage();.|
|00003dd0| 7d 20 2f 2f 20 45 4e 44 | 20 44 72 61 77 4d 65 73 |} // END| DrawMes|
|00003de0| 73 61 67 65 0d 0d 76 6f | 69 64 20 55 70 64 61 74 |sage..vo|id Updat|
|00003df0| 65 4d 65 73 73 61 67 65 | 28 29 20 7b 0d 09 47 72 |eMessage|() {..Gr|
|00003e00| 61 66 50 74 72 20 73 61 | 76 65 50 6f 72 74 3b 0d |afPtr sa|vePort;.|
|00003e10| 09 52 65 63 74 20 6d 73 | 67 42 6f 78 3b 0d 0d 09 |.Rect ms|gBox;...|
|00003e20| 46 72 61 6d 65 42 6f 72 | 64 65 72 44 6f 74 74 65 |FrameBor|derDotte|
|00003e30| 64 28 67 53 65 71 75 65 | 6e 63 65 72 44 6c 6f 67 |d(gSeque|ncerDlog|
|00003e40| 2c 20 6b 53 65 71 44 6c | 6f 67 5f 49 6e 66 6f 42 |, kSeqDl|og_InfoB|
|00003e50| 6f 78 49 74 65 6d 29 3b | 0d 0d 09 47 65 74 50 6f |oxItem);|...GetPo|
|00003e60| 72 74 28 26 73 61 76 65 | 50 6f 72 74 29 3b 0d 09 |rt(&save|Port);..|
|00003e70| 53 65 74 50 6f 72 74 28 | 67 53 65 71 75 65 6e 63 |SetPort(|gSequenc|
|00003e80| 65 72 44 6c 6f 67 29 3b | 0d 09 47 65 74 44 49 74 |erDlog);|..GetDIt|
|00003e90| 65 6d 52 65 63 74 28 67 | 53 65 71 75 65 6e 63 65 |emRect(g|Sequence|
|00003ea0| 72 44 6c 6f 67 2c 20 6b | 53 65 71 44 6c 6f 67 5f |rDlog, k|SeqDlog_|
|00003eb0| 49 6e 66 6f 42 6f 78 49 | 74 65 6d 2c 20 26 6d 73 |InfoBoxI|tem, &ms|
|00003ec0| 67 42 6f 78 29 3b 0d 09 | 49 6e 73 65 74 52 65 63 |gBox);..|InsetRec|
|00003ed0| 74 28 26 6d 73 67 42 6f | 78 2c 20 34 2c 20 34 29 |t(&msgBo|x, 4, 4)|
|00003ee0| 3b 0d 09 69 66 20 28 67 | 4d 65 73 73 61 67 65 5b |;..if (g|Message[|
|00003ef0| 30 5d 20 3d 3d 20 30 29 | 0d 09 09 45 72 61 73 65 |0] == 0)|...Erase|
|00003f00| 52 65 63 74 28 26 6d 73 | 67 42 6f 78 29 3b 0d 09 |Rect(&ms|gBox);..|
|00003f10| 65 6c 73 65 0d 09 09 54 | 65 78 74 42 6f 78 28 26 |else...T|extBox(&|
|00003f20| 67 4d 65 73 73 61 67 65 | 5b 31 5d 2c 20 67 4d 65 |gMessage|[1], gMe|
|00003f30| 73 73 61 67 65 5b 30 5d | 2c 20 26 6d 73 67 42 6f |ssage[0]|, &msgBo|
|00003f40| 78 2c 20 74 65 46 6c 75 | 73 68 4c 65 66 74 29 3b |x, teFlu|shLeft);|
|00003f50| 0d 09 53 65 74 50 6f 72 | 74 28 73 61 76 65 50 6f |..SetPor|t(savePo|
|00003f60| 72 74 29 3b 0d 7d 20 2f | 2f 20 45 4e 44 20 55 70 |rt);.} /|/ END Up|
|00003f70| 64 61 74 65 4d 65 73 73 | 61 67 65 0d 0d 2f 2f 20 |dateMess|age..// |
|00003f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003fa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003fb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003fc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0d 76 6f 69 |--------|---..voi|
|00003fd0| 64 20 55 70 64 61 74 65 | 4c 69 73 74 53 65 6c 65 |d Update|ListSele|
|00003fe0| 63 74 65 64 28 29 20 7b | 0d 09 69 66 20 28 67 43 |cted() {|..if (gC|
|00003ff0| 75 72 72 65 6e 74 4c 69 | 73 74 20 3d 3d 20 67 53 |urrentLi|st == gS|
|00004000| 6f 75 6e 64 73 4c 69 73 | 74 29 20 7b 0d 09 09 44 |oundsLis|t) {...D|
|00004010| 72 61 77 44 65 66 61 75 | 6c 74 4c 69 73 74 42 6f |rawDefau|ltListBo|
|00004020| 72 64 65 72 28 67 53 65 | 71 75 65 6e 63 65 72 44 |rder(gSe|quencerD|
|00004030| 6c 6f 67 2c 20 6b 53 65 | 71 44 6c 6f 67 5f 53 72 |log, kSe|qDlog_Sr|
|00004040| 63 4c 69 73 74 49 74 65 | 6d 2c 20 74 72 75 65 29 |cListIte|m, true)|
|00004050| 3b 0d 09 09 44 72 61 77 | 44 65 66 61 75 6c 74 4c |;...Draw|DefaultL|
|00004060| 69 73 74 42 6f 72 64 65 | 72 28 67 53 65 71 75 65 |istBorde|r(gSeque|
|00004070| 6e 63 65 72 44 6c 6f 67 | 2c 20 6b 53 65 71 44 6c |ncerDlog|, kSeqDl|
|00004080| 6f 67 5f 53 65 71 4c 69 | 73 74 49 74 65 6d 2c 20 |og_SeqLi|stItem, |
|00004090| 66 61 6c 73 65 29 3b 0d | 09 7d 0d 09 65 6c 73 65 |false);.|.}..else|
|000040a0| 20 7b 0d 09 09 44 72 61 | 77 44 65 66 61 75 6c 74 | {...Dra|wDefault|
|000040b0| 4c 69 73 74 42 6f 72 64 | 65 72 28 67 53 65 71 75 |ListBord|er(gSequ|
|000040c0| 65 6e 63 65 72 44 6c 6f | 67 2c 20 6b 53 65 71 44 |encerDlo|g, kSeqD|
|000040d0| 6c 6f 67 5f 53 72 63 4c | 69 73 74 49 74 65 6d 2c |log_SrcL|istItem,|
|000040e0| 20 66 61 6c 73 65 29 3b | 0d 09 09 44 72 61 77 44 | false);|...DrawD|
|000040f0| 65 66 61 75 6c 74 4c 69 | 73 74 42 6f 72 64 65 72 |efaultLi|stBorder|
|00004100| 28 67 53 65 71 75 65 6e | 63 65 72 44 6c 6f 67 2c |(gSequen|cerDlog,|
|00004110| 20 6b 53 65 71 44 6c 6f | 67 5f 53 65 71 4c 69 73 | kSeqDlo|g_SeqLis|
|00004120| 74 49 74 65 6d 2c 20 74 | 72 75 65 29 3b 0d 09 7d |tItem, t|rue);..}|
|00004130| 0d 7d 20 2f 2f 20 45 4e | 44 20 55 70 64 61 74 65 |.} // EN|D Update|
|00004140| 4c 69 73 74 53 65 6c 65 | 63 74 65 64 0d 0d 2f 2f |ListSele|cted..//|
|00004150| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|00004160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 0d 76 6f |--------|----..vo|
|000041a0| 69 64 20 43 68 61 6e 67 | 65 53 6f 75 6e 64 56 6f |id Chang|eSoundVo|
|000041b0| 6c 75 6d 65 28 29 20 7b | 0d 09 6c 6f 6e 67 20 6d |lume() {|..long m|
|000041c0| 65 6e 75 43 6f 64 65 3b | 0d 09 52 65 63 74 20 70 |enuCode;|..Rect p|
|000041d0| 6f 70 52 65 63 74 3b 0d | 09 73 68 6f 72 74 20 63 |opRect;.|.short c|
|000041e0| 75 72 56 6f 6c 3b 0d 09 | 50 6f 69 6e 74 20 6c 6f |urVol;..|Point lo|
|000041f0| 63 3b 0d 09 53 74 72 31 | 35 20 74 65 6d 70 53 74 |c;..Str1|5 tempSt|
|00004200| 72 3b 0d 09 0d 09 47 65 | 74 53 6f 75 6e 64 56 6f |r;....Ge|tSoundVo|
|00004210| 6c 28 26 63 75 72 56 6f | 6c 29 3b 0d 09 66 6f 72 |l(&curVo|l);..for|
|00004220| 20 28 73 68 6f 72 74 20 | 69 20 3d 20 31 3b 20 69 | (short |i = 1; i|
|00004230| 20 3c 3d 20 37 3b 20 69 | 2b 2b 29 0d 09 09 43 68 | <= 7; i|++)...Ch|
|00004240| 65 63 6b 49 74 65 6d 28 | 67 56 6f 6c 75 6d 65 4d |eckItem(|gVolumeM|
|00004250| 65 6e 75 2c 20 69 2c 20 | 66 61 6c 73 65 29 3b 0d |enu, i, |false);.|
|00004260| 09 43 68 65 63 6b 49 74 | 65 6d 28 67 56 6f 6c 75 |.CheckIt|em(gVolu|
|00004270| 6d 65 4d 65 6e 75 2c 20 | 63 75 72 56 6f 6c 2c 20 |meMenu, |curVol, |
|00004280| 74 72 75 65 29 3b 0d 0d | 09 47 65 74 44 49 74 65 |true);..|.GetDIte|
|00004290| 6d 52 65 63 74 28 67 53 | 65 71 75 65 6e 63 65 72 |mRect(gS|equencer|
|000042a0| 44 6c 6f 67 2c 20 6b 53 | 65 71 44 6c 6f 67 5f 56 |Dlog, kS|eqDlog_V|
|000042b0| 6f 6c 50 69 63 49 74 65 | 6d 2c 20 26 70 6f 70 52 |olPicIte|m, &popR|
|000042c0| 65 63 74 29 3b 0d 09 6c | 6f 63 2e 76 20 3d 20 70 |ect);..l|oc.v = p|
|000042d0| 6f 70 52 65 63 74 2e 62 | 6f 74 74 6f 6d 3b 0d 09 |opRect.b|ottom;..|
|000042e0| 6c 6f 63 2e 68 20 3d 20 | 70 6f 70 52 65 63 74 2e |loc.h = |popRect.|
|000042f0| 6c 65 66 74 3b 0d 09 4c | 6f 63 61 6c 54 6f 47 6c |left;..L|ocalToGl|
|00004300| 6f 62 61 6c 28 26 6c 6f | 63 29 3b 0d 0d 09 6d 65 |obal(&lo|c);...me|
|00004310| 6e 75 43 6f 64 65 20 3d | 20 50 6f 70 55 70 4d 65 |nuCode =| PopUpMe|
|00004320| 6e 75 53 65 6c 65 63 74 | 28 67 56 6f 6c 75 6d 65 |nuSelect|(gVolume|
|00004330| 4d 65 6e 75 2c 20 6c 6f | 63 2e 76 2c 20 6c 6f 63 |Menu, lo|c.v, loc|
|00004340| 2e 68 2b 31 2c 20 30 29 | 3b 0d 09 69 66 20 28 6d |.h+1, 0)|;..if (m|
|00004350| 65 6e 75 43 6f 64 65 29 | 20 7b 0d 09 09 63 75 72 |enuCode)| {...cur|
|00004360| 56 6f 6c 20 3d 20 4c 6f | 57 6f 72 64 28 6d 65 6e |Vol = Lo|Word(men|
|00004370| 75 43 6f 64 65 29 3b 0d | 09 09 4e 75 6d 54 6f 53 |uCode);.|..NumToS|
|00004380| 74 72 69 6e 67 28 63 75 | 72 56 6f 6c 2c 20 74 65 |tring(cu|rVol, te|
|00004390| 6d 70 53 74 72 29 3b 0d | 09 09 53 65 74 44 49 74 |mpStr);.|..SetDIt|
|000043a0| 65 6d 54 65 78 74 28 67 | 53 65 71 75 65 6e 63 65 |emText(g|Sequence|
|000043b0| 72 44 6c 6f 67 2c 20 6b | 53 65 71 44 6c 6f 67 5f |rDlog, k|SeqDlog_|
|000043c0| 56 6f 6c 54 65 78 74 49 | 74 65 6d 2c 20 74 65 6d |VolTextI|tem, tem|
|000043d0| 70 53 74 72 29 3b 0d 09 | 09 53 65 74 53 6f 75 6e |pStr);..|.SetSoun|
|000043e0| 64 56 6f 6c 28 63 75 72 | 56 6f 6c 29 3b 0d 09 7d |dVol(cur|Vol);..}|
|000043f0| 0d 7d 20 2f 2f 20 45 4e | 44 20 43 68 61 6e 67 65 |.} // EN|D Change|
|00004400| 53 6f 75 6e 64 56 6f 6c | 75 6d 65 0d 0d 2f 2f 20 |SoundVol|ume..// |
|00004410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004420| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004430| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0d 76 6f 69 |--------|---..voi|
|00004460| 64 20 51 75 69 74 41 6e | 64 43 6c 65 61 6e 75 70 |d QuitAn|dCleanup|
|00004470| 28 29 20 7b 0d 09 73 68 | 6f 72 74 20 63 75 72 56 |() {..sh|ort curV|
|00004480| 6f 6c 3b 0d 0d 09 69 66 | 20 28 67 46 69 6c 65 4f |ol;...if| (gFileO|
|00004490| 70 65 6e 29 0d 09 09 43 | 6c 6f 73 65 46 69 6c 65 |pen)...C|loseFile|
|000044a0| 28 29 3b 0d 0d 09 47 65 | 74 53 6f 75 6e 64 56 6f |();...Ge|tSoundVo|
|000044b0| 6c 28 26 63 75 72 56 6f | 6c 29 3b 0d 09 69 66 20 |l(&curVo|l);..if |
|000044c0| 28 63 75 72 56 6f 6c 20 | 21 3d 20 67 53 61 76 65 |(curVol |!= gSave|
|000044d0| 53 6e 64 56 6f 6c 29 0d | 09 09 53 65 74 53 6f 75 |SndVol).|..SetSou|
|000044e0| 6e 64 56 6f 6c 28 67 53 | 61 76 65 53 6e 64 56 6f |ndVol(gS|aveSndVo|
|000044f0| 6c 29 3b 0d 0d 09 67 44 | 6f 6e 65 20 3d 20 74 72 |l);...gD|one = tr|
|00004500| 75 65 3b 0d 7d 20 2f 2f | 20 45 4e 44 20 51 75 69 |ue;.} //| END Qui|
|00004510| 74 41 6e 64 43 6c 65 61 | 6e 75 70 0d 0d 2f 2f 20 |tAndClea|nup..// |
|00004520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0d 76 6f 69 |--------|---..voi|
|00004570| 64 20 49 6e 69 74 41 70 | 70 28 29 20 7b 0d 09 67 |d InitAp|p() {..g|
|00004580| 41 70 70 52 65 66 4e 75 | 6d 20 3d 20 43 75 72 52 |AppRefNu|m = CurR|
|00004590| 65 73 46 69 6c 65 28 29 | 3b 0d 09 47 65 74 53 6f |esFile()|;..GetSo|
|000045a0| 75 6e 64 56 6f 6c 28 26 | 67 53 61 76 65 53 6e 64 |undVol(&|gSaveSnd|
|000045b0| 56 6f 6c 29 3b 0d 09 49 | 6e 69 74 53 6f 75 6e 64 |Vol);..I|nitSound|
|000045c0| 55 74 69 6c 73 28 29 3b | 0d 0d 09 41 70 70 49 6e |Utils();|...AppIn|
|000045d0| 69 74 41 70 70 6c 65 45 | 76 65 6e 74 73 28 29 3b |itAppleE|vents();|
|000045e0| 0d 0d 09 67 41 70 70 6c | 65 4d 65 6e 75 20 3d 20 |...gAppl|eMenu = |
|000045f0| 47 65 74 4d 65 6e 75 28 | 6b 41 70 70 6c 65 4d 65 |GetMenu(|kAppleMe|
|00004600| 6e 75 49 44 29 3b 0d 09 | 41 64 64 52 65 73 4d 65 |nuID);..|AddResMe|
|00004610| 6e 75 28 67 41 70 70 6c | 65 4d 65 6e 75 2c 20 27 |nu(gAppl|eMenu, '|
|00004620| 44 52 56 52 27 29 3b 0d | 09 49 6e 73 65 72 74 4d |DRVR');.|.InsertM|
|00004630| 65 6e 75 28 67 41 70 70 | 6c 65 4d 65 6e 75 2c 20 |enu(gApp|leMenu, |
|00004640| 30 29 3b 0d 09 0d 09 67 | 46 69 6c 65 4d 65 6e 75 |0);....g|FileMenu|
|00004650| 20 3d 20 47 65 74 4d 65 | 6e 75 28 6b 46 69 6c 65 | = GetMe|nu(kFile|
|00004660| 4d 65 6e 75 49 44 29 3b | 0d 09 49 6e 73 65 72 74 |MenuID);|..Insert|
|00004670| 4d 65 6e 75 28 67 46 69 | 6c 65 4d 65 6e 75 2c 20 |Menu(gFi|leMenu, |
|00004680| 30 29 3b 0d 09 0d 09 67 | 56 6f 6c 75 6d 65 4d 65 |0);....g|VolumeMe|
|00004690| 6e 75 20 3d 20 47 65 74 | 4d 65 6e 75 28 6b 56 6f |nu = Get|Menu(kVo|
|000046a0| 6c 75 6d 65 4d 65 6e 75 | 49 44 29 3b 0d 09 49 6e |lumeMenu|ID);..In|
|000046b0| 73 65 72 74 4d 65 6e 75 | 28 67 56 6f 6c 75 6d 65 |sertMenu|(gVolume|
|000046c0| 4d 65 6e 75 2c 20 2d 31 | 29 3b 0d 09 0d 09 44 72 |Menu, -1|);....Dr|
|000046d0| 61 77 4d 65 6e 75 42 61 | 72 28 29 3b 0d 7d 20 2f |awMenuBa|r();.} /|
|000046e0| 2f 20 45 4e 44 20 49 6e | 69 74 41 70 70 0d 0d 2f |/ END In|itApp../|
|000046f0| 2f 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/ ------|--------|
|00004700| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004710| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004720| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004730| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 0d 76 |--------|-----..v|
|00004740| 6f 69 64 20 49 6e 69 74 | 4c 69 73 74 73 28 29 20 |oid Init|Lists() |
|00004750| 7b 0d 09 52 65 63 74 20 | 76 69 65 77 52 3b 0d 09 |{..Rect |viewR;..|
|00004760| 52 65 63 74 20 64 61 74 | 61 42 6f 75 6e 64 73 3b |Rect dat|aBounds;|
|00004770| 0d 09 43 65 6c 6c 20 63 | 65 6c 6c 53 69 7a 65 20 |..Cell c|ellSize |
|00004780| 3d 20 7b 20 30 2c 20 30 | 20 7d 3b 0d 09 0d 09 47 |= { 0, 0| };....G|
|00004790| 65 74 44 49 74 65 6d 52 | 65 63 74 28 67 53 65 71 |etDItemR|ect(gSeq|
|000047a0| 75 65 6e 63 65 72 44 6c | 6f 67 2c 20 6b 53 65 71 |uencerDl|og, kSeq|
|000047b0| 44 6c 6f 67 5f 53 72 63 | 4c 69 73 74 49 74 65 6d |Dlog_Src|ListItem|
|000047c0| 2c 20 26 76 69 65 77 52 | 29 3b 0d 09 76 69 65 77 |, &viewR|);..view|
|000047d0| 52 2e 72 69 67 68 74 20 | 2d 3d 20 31 36 3b 09 2f |R.right |-= 16;./|
|000047e0| 2f 20 41 6c 6c 6f 77 20 | 66 6f 72 20 73 63 72 6f |/ Allow |for scro|
|000047f0| 6c 6c 62 61 72 0d 09 76 | 69 65 77 52 2e 6c 65 66 |llbar..v|iewR.lef|
|00004800| 74 2b 2b 3b 20 76 69 65 | 77 52 2e 74 6f 70 2b 2b |t++; vie|wR.top++|
|00004810| 3b 20 76 69 65 77 52 2e | 62 6f 74 74 6f 6d 2d 2d |; viewR.|bottom--|
|00004820| 3b 0d 09 53 65 74 52 65 | 63 74 28 26 64 61 74 61 |;..SetRe|ct(&data|
|00004830| 42 6f 75 6e 64 73 2c 20 | 30 2c 20 30 2c 20 31 2c |Bounds, |0, 0, 1,|
|00004840| 20 30 29 3b 09 2f 2f 20 | 4f 6e 65 20 63 6f 6c 75 | 0);.// |One colu|
|00004850| 6d 6e 2c 20 6e 6f 20 72 | 6f 77 73 0d 0d 09 67 53 |mn, no r|ows...gS|
|00004860| 6f 75 6e 64 73 4c 69 73 | 74 20 3d 20 4c 4e 65 77 |oundsLis|t = LNew|
|00004870| 28 26 76 69 65 77 52 2c | 20 26 64 61 74 61 42 6f |(&viewR,| &dataBo|
|00004880| 75 6e 64 73 2c 20 63 65 | 6c 6c 53 69 7a 65 2c 20 |unds, ce|llSize, |
|00004890| 30 2c 0d 09 09 67 53 65 | 71 75 65 6e 63 65 72 44 |0,...gSe|quencerD|
|000048a0| 6c 6f 67 2c 20 74 72 75 | 65 2c 20 66 61 6c 73 65 |log, tru|e, false|
|000048b0| 2c 20 66 61 6c 73 65 2c | 20 74 72 75 65 29 3b 0d |, false,| true);.|
|000048c0| 09 0d 09 47 65 74 44 49 | 74 65 6d 52 65 63 74 28 |...GetDI|temRect(|
|000048d0| 67 53 65 71 75 65 6e 63 | 65 72 44 6c 6f 67 2c 20 |gSequenc|erDlog, |
|000048e0| 6b 53 65 71 44 6c 6f 67 | 5f 53 65 71 4c 69 73 74 |kSeqDlog|_SeqList|
|000048f0| 49 74 65 6d 2c 20 26 76 | 69 65 77 52 29 3b 0d 09 |Item, &v|iewR);..|
|00004900| 76 69 65 77 52 2e 72 69 | 67 68 74 20 2d 3d 20 31 |viewR.ri|ght -= 1|
|00004910| 36 3b 0d 09 76 69 65 77 | 52 2e 6c 65 66 74 2b 2b |6;..view|R.left++|
|00004920| 3b 20 76 69 65 77 52 2e | 74 6f 70 2b 2b 3b 20 76 |; viewR.|top++; v|
|00004930| 69 65 77 52 2e 62 6f 74 | 74 6f 6d 2d 2d 3b 0d 09 |iewR.bot|tom--;..|
|00004940| 67 53 65 71 75 65 6e 63 | 65 72 4c 69 73 74 20 3d |gSequenc|erList =|
|00004950| 20 4c 4e 65 77 28 26 76 | 69 65 77 52 2c 20 26 64 | LNew(&v|iewR, &d|
|00004960| 61 74 61 42 6f 75 6e 64 | 73 2c 20 63 65 6c 6c 53 |ataBound|s, cellS|
|00004970| 69 7a 65 2c 20 30 2c 0d | 09 09 67 53 65 71 75 65 |ize, 0,.|..gSeque|
|00004980| 6e 63 65 72 44 6c 6f 67 | 2c 20 74 72 75 65 2c 20 |ncerDlog|, true, |
|00004990| 66 61 6c 73 65 2c 20 66 | 61 6c 73 65 2c 20 74 72 |false, f|alse, tr|
|000049a0| 75 65 29 3b 0d 09 0d 09 | 28 2a 2a 67 53 6f 75 6e |ue);....|(**gSoun|
|000049b0| 64 73 4c 69 73 74 29 2e | 73 65 6c 46 6c 61 67 73 |dsList).|selFlags|
|000049c0| 20 3d 20 28 2a 2a 67 53 | 65 71 75 65 6e 63 65 72 | = (**gS|equencer|
|000049d0| 4c 69 73 74 29 2e 73 65 | 6c 46 6c 61 67 73 20 3d |List).se|lFlags =|
|000049e0| 0d 09 09 6c 4f 6e 6c 79 | 4f 6e 65 20 2b 20 6c 55 |...lOnly|One + lU|
|000049f0| 73 65 53 65 6e 73 65 20 | 2b 20 6c 4e 6f 4e 69 6c |seSense |+ lNoNil|
|00004a00| 48 69 6c 69 74 65 3b 0d | 09 0d 09 4c 41 63 74 69 |Hilite;.|...LActi|
|00004a10| 76 61 74 65 28 74 72 75 | 65 2c 20 67 53 6f 75 6e |vate(tru|e, gSoun|
|00004a20| 64 73 4c 69 73 74 29 3b | 0d 09 4c 41 63 74 69 76 |dsList);|..LActiv|
|00004a30| 61 74 65 28 74 72 75 65 | 2c 20 67 53 65 71 75 65 |ate(true|, gSeque|
|00004a40| 6e 63 65 72 4c 69 73 74 | 29 3b 0d 0d 09 67 43 75 |ncerList|);...gCu|
|00004a50| 72 72 65 6e 74 4c 69 73 | 74 20 3d 20 67 53 6f 75 |rrentLis|t = gSou|
|00004a60| 6e 64 73 4c 69 73 74 3b | 0d 7d 20 2f 2f 20 45 4e |ndsList;|.} // EN|
|00004a70| 44 20 49 6e 69 74 4c 69 | 73 74 73 0d 0d 2f 2f 20 |D InitLi|sts..// |
|00004a80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004a90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ac0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0d 76 6f 69 |--------|---..voi|
|00004ad0| 64 20 49 6e 69 74 54 6f | 6f 6c 62 6f 78 28 29 20 |d InitTo|olbox() |
|00004ae0| 7b 0d 09 49 6e 69 74 47 | 72 61 66 28 28 50 74 72 |{..InitG|raf((Ptr|
|00004af0| 29 20 26 71 64 2e 74 68 | 65 50 6f 72 74 29 3b 0d |) &qd.th|ePort);.|
|00004b00| 09 49 6e 69 74 46 6f 6e | 74 73 28 29 3b 0d 09 49 |.InitFon|ts();..I|
|00004b10| 6e 69 74 57 69 6e 64 6f | 77 73 28 29 3b 0d 09 49 |nitWindo|ws();..I|
|00004b20| 6e 69 74 4d 65 6e 75 73 | 28 29 3b 0d 09 54 45 49 |nitMenus|();..TEI|
|00004b30| 6e 69 74 28 29 3b 0d 09 | 49 6e 69 74 44 69 61 6c |nit();..|InitDial|
|00004b40| 6f 67 73 28 30 4c 29 3b | 0d 09 49 6e 69 74 43 75 |ogs(0L);|..InitCu|
|00004b50| 72 73 6f 72 28 29 3b 0d | 7d 20 2f 2f 20 45 4e 44 |rsor();.|} // END|
|00004b60| 20 49 6e 69 74 54 6f 6f | 6c 42 6f 78 0d 0d 2f 2f | InitToo|lBox..//|
|00004b70| 20 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d | =======|========|
|00004b80| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004b90| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004ba0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004bb0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 0d 23 64 65 |========|===..#de|
|00004bc0| 66 69 6e 65 20 6b 53 79 | 73 74 65 6d 37 52 65 71 |fine kSy|stem7Req|
|00004bd0| 75 69 72 65 64 44 6c 6f | 67 49 44 20 31 39 37 32 |uiredDlo|gID 1972|
|00004be0| 0d 0d 76 6f 69 64 20 53 | 79 73 74 65 6d 37 52 65 |..void S|ystem7Re|
|00004bf0| 71 75 69 72 65 64 28 29 | 20 7b 0d 09 73 68 6f 72 |quired()| {..shor|
|00004c00| 74 20 64 75 6d 6d 79 3b | 0d 0d 09 69 66 20 28 67 |t dummy;|...if (g|
|00004c10| 45 6e 76 69 72 6f 6e 2e | 73 79 73 56 65 72 73 69 |Environ.|sysVersi|
|00004c20| 6f 6e 20 3c 20 6b 53 79 | 73 74 65 6d 37 56 65 72 |on < kSy|stem7Ver|
|00004c30| 73 69 6f 6e 29 20 7b 0d | 09 09 64 75 6d 6d 79 20 |sion) {.|..dummy |
|00004c40| 3d 20 41 6c 65 72 74 28 | 6b 53 79 73 74 65 6d 37 |= Alert(|kSystem7|
|00004c50| 52 65 71 75 69 72 65 64 | 44 6c 6f 67 49 44 2c 20 |Required|DlogID, |
|00004c60| 6e 69 6c 29 3b 0d 09 09 | 45 78 69 74 54 6f 53 68 |nil);...|ExitToSh|
|00004c70| 65 6c 6c 28 29 3b 0d 09 | 7d 0d 7d 20 2f 2f 20 45 |ell();..|}.} // E|
|00004c80| 4e 44 20 53 79 73 74 65 | 6d 37 52 65 71 75 69 72 |ND Syste|m7Requir|
|00004c90| 65 64 0d 0d 2f 2f 20 3d | 3d 3d 3d 3d 3d 3d 3d 3d |ed..// =|========|
|00004ca0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004cb0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004cc0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004cd0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004ce0| 3d 0d 0d 23 64 65 66 69 | 6e 65 20 6b 41 62 6f 75 |=..#defi|ne kAbou|
|00004cf0| 74 53 65 71 75 65 6e 63 | 65 72 44 6c 6f 67 49 44 |tSequenc|erDlogID|
|00004d00| 20 31 39 37 33 0d 0d 76 | 6f 69 64 20 44 6f 41 62 | 1973..v|oid DoAb|
|00004d10| 6f 75 74 53 65 71 75 65 | 6e 63 65 72 28 29 20 7b |outSeque|ncer() {|
|00004d20| 0d 09 44 69 61 6c 6f 67 | 50 74 72 20 61 62 6f 75 |..Dialog|Ptr abou|
|00004d30| 74 3b 0d 09 73 68 6f 72 | 74 20 69 74 65 6d 48 69 |t;..shor|t itemHi|
|00004d40| 74 2c 20 63 75 72 46 69 | 6c 65 3b 0d 0d 09 63 75 |t, curFi|le;...cu|
|00004d50| 72 46 69 6c 65 20 3d 20 | 43 75 72 52 65 73 46 69 |rFile = |CurResFi|
|00004d60| 6c 65 28 29 3b 0d 09 55 | 73 65 52 65 73 46 69 6c |le();..U|seResFil|
|00004d70| 65 28 67 41 70 70 52 65 | 66 4e 75 6d 29 3b 0d 0d |e(gAppRe|fNum);..|
|00004d80| 09 61 62 6f 75 74 20 3d | 20 47 65 74 4e 65 77 44 |.about =| GetNewD|
|00004d90| 69 61 6c 6f 67 28 6b 41 | 62 6f 75 74 53 65 71 75 |ialog(kA|boutSequ|
|00004da0| 65 6e 63 65 72 44 6c 6f | 67 49 44 2c 20 6e 69 6c |encerDlo|gID, nil|
|00004db0| 2c 20 28 57 69 6e 64 6f | 77 50 74 72 29 2d 31 29 |, (Windo|wPtr)-1)|
|00004dc0| 3b 0d 09 53 65 74 50 6f | 72 74 28 61 62 6f 75 74 |;..SetPo|rt(about|
|00004dd0| 29 3b 0d 09 54 65 78 74 | 46 6f 6e 74 28 67 65 6e |);..Text|Font(gen|
|00004de0| 65 76 61 29 3b 20 54 65 | 78 74 53 69 7a 65 28 39 |eva); Te|xtSize(9|
|00004df0| 29 3b 0d 09 53 68 6f 77 | 57 69 6e 64 6f 77 28 61 |);..Show|Window(a|
|00004e00| 62 6f 75 74 29 3b 0d 09 | 44 72 61 77 44 65 66 61 |bout);..|DrawDefa|
|00004e10| 75 6c 74 42 6f 72 64 65 | 72 28 61 62 6f 75 74 2c |ultBorde|r(about,|
|00004e20| 20 6f 6b 29 3b 0d 09 4d | 6f 64 61 6c 44 69 61 6c | ok);..M|odalDial|
|00004e30| 6f 67 28 6e 69 6c 2c 20 | 26 69 74 65 6d 48 69 74 |og(nil, |&itemHit|
|00004e40| 29 3b 0d 09 44 69 73 70 | 6f 73 65 44 69 61 6c 6f |);..Disp|oseDialo|
|00004e50| 67 28 61 62 6f 75 74 29 | 3b 0d 0d 09 55 73 65 52 |g(about)|;...UseR|
|00004e60| 65 73 46 69 6c 65 28 63 | 75 72 46 69 6c 65 29 3b |esFile(c|urFile);|
|00004e70| 0d 7d 20 2f 2f 20 45 4e | 44 20 44 6f 41 62 6f 75 |.} // EN|D DoAbou|
|00004e80| 74 53 65 71 75 65 6e 63 | 65 72 00 00 00 00 00 00 |tSequenc|er......|
|00004e90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ea0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004eb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004f00| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 32 |.......L|...L...2|
|00004f10| 55 74 69 6c 73 2e 63 2b | 2b 00 00 00 00 00 00 00 |Utils.c+|+.......|
|00004f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004f30| 08 6d 61 69 6e 2e 63 2b | 2b 6d 02 00 00 00 54 45 |.main.c+|+m....TE|
|00004f40| 58 54 4d 4d 43 43 01 00 | ff ff ff ff 00 00 00 00 |XTMMCC..|........|
|00004f50| 00 00 54 45 58 54 4d 4d | 43 43 01 00 ff ff ff ff |..TEXTMM|CC......|
|00004f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004f70| 00 00 aa 76 c8 e6 00 00 | 4e 0a 00 00 01 7e 00 00 |...v....|N....~..|
|00004f80| 00 00 00 00 00 01 00 00 | 00 00 00 de 09 4d 61 63 |........|.....Mac|
|00004f90| 4f 53 2e 6c 69 62 00 00 | 00 00 00 00 00 00 00 00 |OS.lib..|........|
|00004fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004fb0| 01 01 00 00 00 00 00 00 | 00 00 00 02 00 01 00 00 |........|........|
|00004fc0| 00 bc 0a 43 6f 6d 70 61 | 74 2e 63 2b 2b 00 00 00 |...Compa|t.c++...|
|00004fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004fe0| 00 00 00 00 00 00 01 01 | 00 00 00 00 00 00 00 00 |........|........|
|00004ff0| 00 03 00 01 00 00 00 bc | 0f 44 69 61 6c 6f 67 55 |........|.DialogU|
|00005000| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00005010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005020| 00 00 00 00 00 00 00 03 | 00 04 00 56 00 03 01 dc |........|...V....|
|00005030| 02 7d 00 56 00 03 01 dc | 02 7d aa a3 73 ed 00 00 |.}.V....|.}..s...|
|00005040| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 01 00 |........|........|
|00005050| 00 00 01 4c 00 00 00 4c | 00 00 00 32 00 66 24 28 |...L...L|...2.f$(|
|00005060| 16 0a 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.......2|..MPSR..|
|00005070| 00 0a 03 ed ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+